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[57] ABSTRACT 

A compiler framework uses a generic "shell" and a generic 
back end (where the code generator is target- specific). The 
generic back end provides the functions of optimization, 
register and memory allocation, and code generation. The 
code generation function of the back end may be targeted for 
any of a number of computer architectures. A front end is 
tailored for each different source language, such as Cobol, 
Fortran, Pascal, C, C++, etc. The front end scans and parses 
the source code modules, and generates from them an 
intermediate language representation of the source code 
programs expressed in the source code. The intermediate 
language represents any of the source code languages in a 
universal manner, so the interface between the front end and 
back end is of a standard format, and need not be rewritten 
for each language-specific front end. A feature is a method 
for doing code generation using code templates in a multi- 
pass manner. The selection and application of code tem- 
plates occurs at four different times during the compilation 
process: (1) A pattern select phase does a pattern match in a 
context pass to select the best code templates; (2) Tasks of 
the context pass use context actions of the selected templates 
to analyze the evaluation order to expressions and to allocate 
temporary names; (3) A bind pass uses the binding actions 
of the selected templates to allocate template names; (4) 
Finally, a code pass uses code generation actions of the 
selected templates to guide the generation of object code. 

14 Claims, 4 Drawing Sheets 
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OPTIMIZING COMPILER USING 
TEMPLATES CORRESPONDING TO 
PORTIONS OF AN INTERMEDIATE 
LANGUAGE GRAPH TO DETERMINE AN 

ORDER OF EVALUATION AND TO 5 
ALLOCATE LIFETIMES TO TEMPORARY 
NAMES FOR VARIABLES 

This application is a continuation of application Ser. No. 
07/662,464 filed on Feb. 27, 1991, now abandoned 10 

RELATED CASES 

This application discloses subject matter also disclosed in 
the following copending applications, filed herewith and 15 
assigned to Digital Equipment Corporation, the assignee of 
this application No. 08/249,670, May 26, 1994, pending 

Com. of Sen No. 662,461, filed Feb. 27, 1991, abn., by 
Robert Neil Faiman, Jr., David Scott Blickstein and Steven 
Hobbs, for "INTERFACE FOR REPRESENTING 20 
EFFECTS IN A MULTILANGUAGE OPTIMIZING COM- 
PILER"; No. 08/243,560, May 16,. 1994, pending 

Cont. of Ser. No. 662,725, filed Feb. 27, 1991, abn., by 
Robert Neil Faiman, Jr., for "METHOD OF CONSTRUCT- 
ING A CONSTANT-FOLDING MECHANISM IN A MUL- 25 
TILANGUAGE OPTIMIZING COMPILER"; No. 08/364, 
437, Dec. 27, 1994, pending; Cont. of No. 08/243,615, May 
16, 1994, abn. 

Cont of Ser. No. 662,477, filed Feb. 27, 1991, abn., by 3Q 
Dennis Joseph Murphy and Robert Neil Faiman, Jr., for 
"INTERFACE FOR SYMBOL TABLE CONSTRUCTION 
IN A MULTILANGUAGE OPTIMIZING COMPILER"; 
No. 08/400,172, Mar. 6, 1995, pending 

Cont of Ser. No. 662,483, filed Feb. 27, 1991, abn., by 35 
David Scott Blickstein, for "ANALYZING INDUCTIVE 
EXPRESSIONS IN A MULTILANGUAGE OPTIMIZING 
COMPILER"; 

BACKGROUND OF THE INVENTION 40 

This invention relates to compilers for digital computer 
programs, and more particularly to a compiler framework 
that is adapted to be used with a number of different 
computer languages, to generate code for a number of 45 
different target machines. 

Compilers are usually constructed for translating a spe- 
cific source language to object code for execution on a 
specific target machine which has a specific operating sys- 
tem. For example, a Fortran compiler may be available for 50 
generating code for a computer having the VAX architecture 
using the VMS operating system, or a C compiler for a 
80386 computer executing MS/DOS. Intermediate parts of 
these language- and target- specific compilers share a great 
deal of common structure and function, however, and so 55 
construction of a new compiler can be aided by using some 
of the component parts of an existing compiler, and modi- 
fying others. Nevertheless, it has been the practice to con- 
struct new compilers for each combination of source lan- 
guage and target machine, and when new and higher- $0 
performance computer architectures are designed the task of 
rewriting compilers for each of the commonly-used source 
languages is a major task. 

The field of computer-aided software engineering (CASE) 
is heavily dependent upon compiler technology. CASE tools 65 
and programming environments are built upon core com- 
pilers. In addition, performance specifications of computer 
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hardware are often integrally involved with compiler tech- 
nology. The speed of a processor is usually measured in 
high-level language benchmarks, so therefore optimizing 
compilers can influence the price-performance factor of new 
computer equipment. 

In order to facilitate construction of compilers for a 
variety of different high-level languages, and different target 
computer architectures, it is desirable to enhance the com- 
monality of core components of the compiler framework. 
The front end of a compiler directly accesses the source code 
module, and so necessarily is language-specific; a compiler 
front end constructed to interpret Pascal would not be able 
to interpret C. Likewise, the code generator in the back end 
of a compiler has to use the instruction set of the target 
computer architecture, and so is machine-specific. Thus, it is 
the intermediate components of a compiler that are suscep- 
tible to being made more generic, compiler front end usually 
functions to first translate the source code into an interme- 
diate language, so that the program that was originally 
written in the high-level source language appears in a more 
elemental language for the internal operations of the com- 
piler. The front end usually produces a representation of the 
program or routine, in intermediate language, in the form of 
a so-called graph, along with a symbol table. These two data 
structures, the intermediate language graph and the symbol 
table, are the representation of the program as used inter- 
nally by the compiler. Thus, by making the intermediate 
language and construction of the symbol table of universal 
or generic character, the components following the front end 
can be made more generic, 

After the compiler front end has generated the interme- 
diate language graph and symbol table, various optimizing 
techniques are usually implemented. The flow graph is 
rearranged, meaning the program is rewritten, to optimize 
speed of execution on the target machine. Some optimiza- 
tions are target-specific, but most are generic. Commonly - 
used optimizations are code motion, strength reduction, etc. 
Next in the internal organization of a compiler is the register 
and memory allocation. Up to this point, data references 
were to variables and constants by name or in the abstract, 
without regard to where stored; now, however, data refer- 
ences are assigned to more concrete locations, such as 
specific registers and memory displacements (not memory 
addresses yet). At this point, further optimizations are pos- 
sible, in the form of register allocation to maintain data in 
registers are minimize memory references; thus the program 
may be again rearranged to optimize register usage. Register 
allocation is also somewhat target machine dependent, and 
so the generic nature of the compiler must accommodate 
specifying the number, size and special assignments for the 
register set of the target CPU. Following register and 
memory allocation, the compiler implements the code gen- 
eration phase, in which object code images are produced, 
and these are of course in the target machine language or 
instruction set, i.e., machine-specific. Subsequently, the 
object code images are linked to produce executable pack- 
ages, adding various run-time modules, etc., all of which is 
machine-specific. 

In a typical compiler implementation, it is thus seen that 
the structure of the intermediate language graph, and the 
optimization and register and memory allocation phases, are 
those most susceptible to being made more generic. How- 
ever, due to substantive differences in the high-level lan- 
guages most commonly used today, and differences in target 
machine architecture, obstacles exist to discourage construc- 
tion of a generic compiler core. 
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SUMMARY OF THE INVENTION 

In accordance with one embodiment of the invention, a 
compiler framework is provided which uses a generic 
"shell" or control and sequencing mechanism, and a generic 5 
back end (where the code generator is of course target- 
specific). The generic back end provides the functions of 
optimization, register and memory allocation, and code 
generation. The shell may be executed on various host 
computers, and the code generation function of the back end {Q 
may be targeted for any of a number of computer architec- 
tures. A front end is tailored for each different source 
language, such as Cobol, Fortran, Pascal, C, C++, Ada, etc. 
The front end scans and parses the source code modules, and 
generates from them an intermediate language representa- l5 
tion of the programs expressed in the source code. This 
intermediate language is constructed to represent any of the 
source code languages in a universal manner, so the interface 
between the front end and back end is of a standard format, 
and need not be rewritten for each language-specific front 2Q 
end. 

The intermediate language representation generated by 
the front end is based upon a tuple as the elemental unit, 
where each tuple represents a single operation to be per- 
formed, such as a load, a store, an add, a label, a branch, etc. 25 
A data structure is created by the front end for each tuple, 
with fields for various necessary information. Along with the 
ordered series of tuples, the front end generates a symbol 
table for all references to variables, routines, labels, etc, as 
is the usual practice. The tuples are in ordered sequences 30 
within blocks, where a block is a part of the code that begins 
with a routine or label and ends in a branch, for example, 
where no entry or exit is permitted between the start and 
finish of a block. Each block is also a data structure, or node, 
and contains pointers to its successors and predecessors 35 
(these being to symbols in the symbol table). The interlinked 
blocks make up a flow graph, called the intermediate lan- 
guage graph, which is the representation of the program used 
by the back end to do the optimizations, register and 
memory allocations, etc. 40 

One of the features of the invention is a mechanism for 
representing effects and dependencies in the interface 
between front end and back end. A tuple has an effect if it 
writes to memory, and has a dependency if it reads from a 
location which some other node may write to. Various higher 45 
level languages have differing ways of expressing opera- 
tions, and the same sequence may in one language allow a 
result or dependency, while in another language it may not. 
Thus, a mechanism which is independent of source language 
is provided for describing the effects of program execution. 50 
This mechanism provides a means for the compiler front end 
to generate a detailed language-specific information to the 
multilanguage optimizer in the compiler back end. This 
mechanism is used by the global optimizer to determine 
legal and effective optimizations, including common subex- 55 
pression recognition and code motions. The intermediate 
language and structure of the tuples contain information so 
that the back end (optimizers) can ask questions of the front 
end (obtain information from the intermediate language 
graph), from which the back end can determine when the 60 
execution of the code produced for the target machine for 
one tuple will affect the value computed by code for another 
tuple. The interface between back end and front end is in this 
respect language independent. The back end does not need 
to know what language it is compiling. The advantage is that 65 
a different back end (and shell) need not be written for each 
source language, but instead an optimizing compiler can be 
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produced for each source language by merely tailoring a 
front end for each different language. 

Another feature of one embodiment of the invention is the 
use in the optimization part of the compiler of a method for 
analyzing induction variables. A variable is said to be an 
induction variable if it increments or decrements once every 
lime through the loop, and is executed at most once each 
time through the loop. In addition to finding induction 
variables, this optimization finds inductive expressions, 
which are expressions that can be computed as linear 
functions of induction variables. The object of this optimi- 
zation is generally to replace multiplications with additions, 
which are cheaper execute faster on most architectures); this 
is known as strength reduction. Detection of induction 
variables requires the use of "sets" of potential induction 
variables; doing this dynamically for each loop is an expen- 
sive and complicated operation, so the improvement here is 
to use the side effects sets used to construct IDEF sets. 

An additional feature of one embodiment of the invention 
is a mechanism for "folding constants" (referred to as 
K-folding or a KFOLD routine), included as one of the 
optimizations. This mechanism is for finding occurrences 
where expressions can be reduced to a constant and calcu- 
lated at compile time rather than a more time-consuming 
calculation during runtime. An important feature is that the 
KFOLD code is built by the compiler framework itself 
rather than having to be coded or calculated by the user. The 
KFOLD builder functions as a front end, like the other 
language-specific front ends, but there is no source code 
input; instead, the input is in intermediate language and 
merely consists of a listing of all of the operators and all of 
the data types. The advantage is that a much more thorough 
KFOLD package can be generated, at much lower cost. 

A further feature of one embodiment is the type definition 
mechanism, referred to a the TD module. This module 
provides mechanisms used by the front end and the compiler 
of the back end in constructing program type information to 
be incorporated in an object module for use by a linker or 
debugger. The creation of "type information" takes place in 
the context of symbol table creation and allows a front end 
to specify to the back end an abstract representation of 
program type information. The TD module provides service 
routines that allow a front end to describe basic types and 
abstract types. 

In addition, a feature of one embodiment is a method for 
doing code generation using one set of code templates in a 
multipass manner. The selection and application of code 
templates occurs at four different times during the compi- 
lation process: (1) The pattern select or PATSELECT phase 
does a pattern match in the CONTEXT pass to select the best 
code templates; (2) The TNASSIGN and TNLIFE tasks of 
the CONTEXT pass use context actions of the selected 
templates to analyze the evaluation order to expressions and 
to allocate temporary names (TNs) with lifetimes nonlocal 
to the code templates; (3) The TNBIND pass uses the 
binding actions of the selected templates to allocate TNs 
with lifetimes local to the code templates; (4) Finally, the 
CODE pass uses code generation actions of the selected 
templates to guide the generation of object code. 

BRIEF DESCRIPTION OF THE DRAWINGS 

The novel features believed characteristic of the invention 
are set forth in the appended claims. The invention itself, 
however, as well as other features and advantages thereof, 
will be best understood by reference to the detailed descrip- 
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tion of specific embodiments which follows, when read in 
conjunction with the accompanying drawings, wherein: 

FIG. 1 is a schematic representation of a compiler using 
features of the invention; 

FIG. 2 is an electrical diagram in block form of a host 5 
computer upon which the methods of various features of the 
invention may be executed; 

FIG. 3 is a diagrammatic representation of code to be 
compiled by the compiler of FIG. 1, in source code form, 1Q 
intermediate language form, tree from, and assembly lan- 
guage form; 

FIG. 4 is a diagrammatic representation of the data 
structure of a tuble used in the compiler of FIG. 1; 

FIG. 5 is a logic flow chart of the operation of the shell 15 
of FIG. 1; 

FIG. 6 is an example listing of code containing constants; 
and 

FIG. 7 is a diagram of data fields and relationships 
(pointers) for illustrating type definition according to one 
feature of the invention. 



DETAILED DESCRIPTION OF SPECIFIC 
EMBODIMENTS 



20 



25 



Referring to FIG. 1, the compiler framework 10 according 
to one embodiment of the invention is a language-indepen- 
dent framework for the creation of portable, retargetable 
compilers. The compiler framework 10 consists of a portable 3Q 
operating system interface referred to as the shell 11 and a 
retargetable optimizer and code generator 12 (the back end). 
The shell 11 is portable in that can be adapted to function 
with any of several operating systems such as VAX/VMS, 
Unix, etc., executing on the host computer. The shell oper- 35 
ates under this host operating system 13 executing on a host 
computing system as seen in FIG. 2, typically including a 
CPU 14 coupled to a main memory 15 by a system bus 16, 
and coupled to disk storage 17 by an I/O controller 18. The 
shell 11 and compiler 12 may be combined with a front end ^ 
20 to create a portable, retargetable compiler for a particular 
source language. Thus, a compiler based on the framework 
10 of the invention consists of three basic parts: a shell 11 
which has been tailored for a particular host operating 
system 14 — this determines the host environment of the 45 
compiler; a front end 20 for a particular source language 
(e.g., C, C-H-, Pascal, Fortran, Ada, Cobol, etc.) — this deter- 
mines the source language of the compiler; and a back end 
12 for a particular target machine (i.e., a particular archi- 
tecture such as VAX, RISC, etc.) — this determines the target 5Q 
machine of the compiler. 

Since the interfaces between the shell 11, the front end 20, 
and the back end 12 are fixed, the individual components of 
a compiler produced according to the invention may be 
replaced freely. That is, the front end 20 may consist of a 55 
number of interchangeable front ends, e.g., one for Fortran, 
one for Cobol, one for Pascal, one for C, etc. Likewise, a 
shell 11 tailored for running under VMS on a VAX computer 
may be replaced by a shell 11 running under the Unix 
operating system on a RISC workstation, while the front end $o 
20 and back end 12 remain the same. 

The shell 11 provides a fixed interface between the host 
operating system 13 and the rest of the compiler. The shell 
provides several advantages according to the invention. 
First, the shell 11 provides a portable interface to basic 65 
features of the operating system 13. For example, the front 
end 20 need not know details of the file system, command 



parsing, or heap storage allocation under the host operating 
system 13, since all these services are accessed through shell 
routines, and the shell is tailored to the operating system 13 
being used. Second, the shell 11 eliminates duplication of 
effort by providing a single implementation of some com- 
mon compiler components, such as command line parsing, 
include-file processing, and diagnostic file generation. 
Third, the use of these common components also guarantees 
consistency among compilers created using the framework 
10; all compilers created using this framework 10 will write 
listing files in the same format, will treat command line 
qualifiers the same, will issue similar-looking error mes- 
sages, etc. Fourth, having common shell utilities in the shell 
11 improves the internal integration of the compiler, since 
the front and back ends 20 and 12 use the same shell 
functions. For example, use of the shell locator package 
means that source file locations can be referred to consis- 
tently in the source listing, front-end generated diagnostics, 
back-end generated diagnostics, the object listing, and the 
debugger information. 

The front end 20 is the only component of a compiler 
created by the framework 10 which understands the source 
language being compiled. This source language is that used 
to generate the text of a source code file or files (module or 
modules) 21 which define the input of the compiler. The 
front end 20 performs a number of functions. First, it calls 
the shell 11 to obtain command line information and text 
lines from the source files 21. Second, the front end 20 calls 
the shell 11 to control the listing file, write diagnostic 
messages, and possibly to write other files for specific 
languages. Third, the front end 20 does lexical, syntactic, 
and semantic analysis to translate the source text in file 21 
to a language-independent internal representation used for 
the interface 22 between the front end 20 and the back end 
12. Fourth, the front end 20 invokes the back end 12 to 
generate target system object code 23 from the information 
in the internal representation. Fifth, the front end 20 pro- 
vides routines which the back end 12 calls via call path 24 
to obtain language-specific information during back end 
processing. Not included in the compiler framework of FIG. 
1 is a linker which links the object code modules or images 
23 to form an executable image to run on the target machine 
25. 

The target machine 25 for which the back end 12 of the 
compiler creates code is a computer of some specific archi- 
tecture, i.e., it has a register set of some specific number and 
data width, the logic executes a specific instruction set, 
specific addressing modes are available, etc. Examples are 
(1) the VAX architecture, as described in (2) a RISC type of 
architecture based upon the 32-bit RISC chip available from 
MIPS, Inc., as part number R2000 or R3000 and described 
by Lane in "MIPS R2000 RISC Architecture", Printice-Hall, 
1987, and (3) an advanced RISC architecture with 64-bit 
registers as described in copending application Ser. No. 
547,589, filed Jun. 29, 1990. Various other architectures 
would be likewise accommodated. 

In general, the front end 20 need not consider the archi- 
tecture of the target machine 25 upon which the object code 
23 will be executed, when the front end 20 is translating 
from source code 15 to the internal representation of inter- 
face 22, since the internal representation is independent of 
the target machine 25 architecture. Some aspects of the front 
end 20 may need to be tailored to the target system, 
however; for example, aspects of the data representation 
such as allocation and alignment, might be customized to fit 
the target machine 25 architecture better, and routine call 
argument mechanisms may depend on the target system 
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calling standard, and further the runtime library interface 
will probably be different for each target system. 

The back end 12 functions to translate the internal rep- 
resentation 22 constructed by the front end 20 into target 
system object code 23. The back end 12 performs the basic 5 
functions of optimization 26, code generation 27, storage 
and register allocation 28, and object file emission 29. The 
optimization function is performed on the code when it is in 
its internal representation. The back end 12 also includes 
* utility routines which are called by the front end 20 to create 10 
a symbol table 30 and intermediate language data structures. 

When the user (that is, a user of the computer system of 
FIG. 2, where the computer system is executing the oper- 
ating system 13) invokes the compiler of FIG. 1 (though a 
callable interface, or some other mechanism), the shell 11 15 
receives control, The shell 11 invokes the front end 20 to 
compile an input stream from source file 15 into an object 
file 23. The front end 20 invokes the back end 12 to produce 
each object module within the object file 23. The from end 
20 may invoke the back end 12 to create code for each 20 
individual routine within an object module 23, or it may call 
a back end driver which will generate code for an entire 
module at once. 

The front end 20 parses the source code 21 and generates 
an intermediate language version of the program expressed 25 
in the source code. The elemental structure of the interme- 
diate language is a tuple. A tuple is an expression which in 
source language performs one operation. For example, refer- 
ring to FIG. 3, the expression ^ 

as represented in source language is broken down into four 
tuples for representation in the intermediate language, these 35 
being numbered $1, $2, $3 and $4. This way of expressing 
the code in IL includes a first tuple $1 which is a fetch 
represented by an item 31, with the object of the fetch being 
a symbol J. The next tuple is a literal, item 32, also making 
reference to a symbol "1." The next tuple is an Add, item 33, 40 
which makes reference to the results of tuples $1 and $2. The 
last tuple is a store, item 34, referencing the result of tuple 
$3 and placing the result in symbol I in the symbol table. The 
expression may also be expressed as a logic tree as seen in 
FIG. 3, where the tuples are identified by the same reference 45 
numerals. This same line of source code could be expressed 
in assembly for a RISC type target machine, as three 
instructions LOAD, ADD integer, and STORE, using some 
register such as REG 4 in the register file, in the general form . 
seen in FIG. 3. Or, for a CISC machine, the code emitted 50 
may be merely a single instruction, ADD #U,I as also seen 
in the Figure. 

A tuple, then, is the elemental expression of a computer 
program, and in the form used in this invention is a data 
structure 35 which contains at least the elements set forth in 55 
FIG. 4, including (1) an operator and type field 36, e.g., 
Fetch, Store, Add, etc., (2) a locator 37 for defining where 
in the source module 21 the source equivalent to the tuple is 
located, (3) operand pointers 38 to other tuples, to literal 
nodes or symbol nodes, such as the pointers to I and #1 60 
tuples $1 and $2 in FIG. 3. A tuple also has attribute fields 
39, which may include, for example, Label, Conditional 
Branch, Argument (for Calls), or SymRef (a symbol in the 
symbol table). The tuple has a number field 40, representing 
the order of this tuple in the block, 65 

The front end 20 parses the source code to identify tuples, 
then to identify basic blocks of code. A block of code is 
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defined to be a sequence of tuples with no entry or exit 
between the first and last tuple. Usually a block starts with 
a label or routine entry and ends with a branch to another 
label. A task of the front end 20 is to parse the source code 
21 and identify the tuples and blocks, which of course 
requires the front end to be language specific. The tuple thus 
contains fields 41 that say whether or not this tuple is the 
beginning of a block, and the end of a block. 

As discussed in more detail below, one feature of the 
invention is a method of representing effects. A tuple has 
effects if it stores or writes to a memory location (repre- 
sented at the IL level as a symbol), or is dependent upon 
what another tuple writes to a location. Thus, in the example 
given in FIG. 3, tuple $4 has an effect (store to I) and tuple 
$1 has a dependency (content of J). Thus the tuple data 
structure as represented in FIG. 4 has fields 42 and 43 to 
store the effects and dependencies of this tuple. 

A single execution of a compiler of FIG. 1 is driven by the 
shell 11 as illustrated in the flow chart of FIG. 5. As indicated 
by the item 45 of FIG. 5, the shell 11 receives control when 
the compiler of FIG. 1 is invoked by the user via the 
operating system 13. The user in a command line specifies 
a "plus-list" or list of the modules 21 to be operated upon. 
The next step is calling by the shell 11 of a front-end routine 
GEM$XX_INIT, which does any necessary initialization 
for the front end, indicated by the item 46. This front end 
routine GEM$XX_INIT is described in the Appendix. Next, 
the shell 11 parses the global command qualifiers and calls 
the front end routine GEM$XX_PROCESS_GLOBALS, 
as indicated by the item 47. Then, for each "plus-list" 
(comma-separated entity) in the command line used at the 
operating system 13 level to involve the compiler, the shell 
executes a series of actions; this is implemented by a loop 
using a decision point 48 to check the plus-list. So long as 
there is an item left in the plus-list, the actions indicated by 
the items 49-52 are executed. These actions include access- 
ing the source files 21 specified in the command line and 
creating an input stream for them, indicated by the item 49, 
then parsing the local qualifiers (specific to that plus-list), 
calling GEM$XX_PROCESS_LOCALS to do any front- 
end determined processing on them, and opening the output 
files specified by the qualifiers, indicated by the item 50. The 
actions in the loop further include calling the front-end 
routine GEM$XX_COMPILE to compile the input stream, 
indicated by the item 51, then closing the output files, item 
52. When the loop falls through, indicating all of the plus-list 
items have been processed, the next step is calling the front 
end routine GEM$XX_FINI to do any front-end cleanup, 
indicated by item 53. Then, the execution is terminated, 
returning control to the invoker, item 54. 

The shell 11 calls GEM$XX„COMPILE to compile a 
single input stream. An input stream represents the concat- 
enation of the source files or modules 21 specified in a single 
"plus list" in the compiler command line, as well as any 
included files or library text. By default, compiling a single 
input stream produces a single object file 23, although the 
compiler does allow the front end 20 to specify multiple 
object files 23 during the compilation of an input stream. 

Before calling GEM$XX_COMPILE, the shell 11 cre- 
ates the input stream, parses the local qualifiers, and opens 
the output files. After calling GEM$XX_COMPILE, it 
closes all the input and output files. 

The front end 20 (GEM$XX„COMPILE and the front- 
end routines that are called from it) reads source records 21 
from the input stream, translates them into the intermediate 
representation of interface 22 (including tuples, blocks, etc. 
of the intermediate language graph, and the symbol table) 
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and invokes the back end 12 to translate the intermediate 
representation into object code in the object file 23. 

An object file 23 may contain any number of object 
modules. Pascal creates a single object module for an entire 
input stream (a MODULE or PROGRAM). FORTRAN (in 5 
one embodiment) creates a separate object module for each 
END statement in the input stream. BLISS creates an object 
module for each MODULE. 

To create an object module 23, the front end 20 translates 
the input stream or some subsequence thereof (which we can 10 
call a source module 21) into its internal representation for 
interface 22, which consists of a symbol table 30 for the 
module and an intermediate language graph 55 for each 
routine. The front end 20 then calls back end routines to 
initialize the object module 23, to allocate storage for the 15 
symbols in the symbol table 30 via storage allocation 28 t to 
initialize that storage, to generate code for the routines via 
emitter 29, and to complete the object module 23. 

The compiler is organized as a collection of packages, 
each of which defines a collection of routines or data 20 
structures related to some aspect of the compilation process. 
Each package is identified by a two-letter code, which is 
generally an abbreviation of the package function. The 
interface to a package is defined by a specification file. If a 
package is named ZZ, then its specification file will be 25 
GEM$ZZ.SDL. 

Any symbol which is declared in a package's specifica- 
tion file is said to be exported from that package. In general, 
symbols exported from package ZZ have names beginning 
with GEM$ZZ_. The specific prefixing conventions for 30 
global and exported names are set forth in Table 1 . 

The shell 11 is a collection of routines to support common 
compiler activities. The shell components are interrelated, so 
that a program that uses any shell component gets the entire 
shell. It is possible, however, for a program to use the shell 35 
11 without using the back end 12. This can be a convenient 
way of writing small utility programs with production- 
quality features (input file concatenation and inclusion, 
command line parsing, diagnostic file generation, good 
listing files, etc.) Note that the shell 11 is actually the "main 40 
program" of any program that uses it, and that the body of 
the application must be called from the shell 11 using the 
conventions described below. To use a shell package ZZ 
from a BLISS program, a user does a LIBRARY 
'GEM$ZZ\ To use the shell from other languages, a user 45 
must first translate the shell specification files into the 
implementation language. 

The shell packages are summarized in the following 
paragraphs; they are documented in their specification files 
(the GEM$ZZ.SDL files) in the Appendix. Most shell rou- 50 
tine arguments (e.g., integer, string, etc.) fall into one of the 
categories set forth in Table 2. 

The interface from the shell 11 to the front end 20 has 
certain requirements. Since the shell 11 receives control 
when a compiler of FIG. 1 is invoked, a front end 20 must 55 
declare entry points so the shell 11 can invoke it and declare 
global variables to pass front end specific information to the 
shell 11.' The front end 20 provides the global routines set 
forth in Table 3, in one embodiment. These routines have no 
parameters and return no results. 60 

The Virtual Memory Package (GEM$VM): The virtual 
memory package provides a standard interface for allocating 
virtual memory. It supports the zoned memory concept of 
the VMS LIB$VN facility; in fact, under VMS, GEMSVM 
is an almost transparent layer over LIBSVM. However, the 65 
GEMSVM interface is guaranteed to be supported 
unchanged on any host system. 
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The Locator Package (GEM$LO): A locator describes a 
range of source text 21 (starting and ending file, line, and 
column number). The text input package returns locators for 
the source lines that it reads. Locators are also used in the 
symbol table 30 and intermediate language nodes 43 to 
facilitate message and debugger table generation, and are 
used for specifying where in the listing file the listing 
package should perform actions. A locator is represented as 
a longword. The locator package maintains a locator data- 
base, and provides routines to create and interpret locators. 
There is also a provision for user-created locators, which 
allow a front end to create its own locators to describe 
program elements which come from a non-standard source 
(for example, BLISS macros or Ada generic instantiation). 

The Text Input Package (GEM$TI): The text input pack- 
age supports concatenated source files 21, nested (included) 
source files 21, and default and related files specs, while 
insulating the front end 20 from the I/O architecture of the 
underlying operating system 13. Text of a source file 21 is 
read a line at a time. The text input package GEM$TI 
colludes with the locator package GEMSLO 10 create a 
locator describing each source line it reads. 

The Text Output Package (GEM$TX): The text output 
package supports output to any number of output files 44 
simultaneously. Like the text input package, it insulates its 
caller from the operating system 13. It will write strings 
passed by reference or descriptor. It provides automatic line 
wrapping and indentation, page wrapping, and callbacks to 
a user- provided start-of-page routine. 

The Listing Package (GEMSLS): The listing package will 
write a standard format listing file containing a copy of the 
source files 21 (as read by the text input package GEMSTI), 
with annotations provided by the front end 11 at locations 
specified with locators. The listing file is created as a 
GEMSTX output file 44, which the front end 20 may also 
write to directly, using the GEMSTX output routines. 

The Internal Representation 

The internal representation of a module 21 comprises a 
symbol table 30 for the module and a compact intermediate 
language graph 55 or CILG, for each routine in source 
module 21. These are both pointer-linked data structures 
made up of nodes. 

Nodes, according to the framework of FIG. 1, will be 
defined. Almost all data structures used in the interface 
between the front and back ends 20 and 12 (and most of the 
data structures used privately by the back end 12) are nodes. 
A node as the term is used herein is a self-identifying block 
of storage, generally allocated from the heap with 
GEM$VM__,GET. All nodes have the aggregate type GEM- 
SNODE, with fields GEM$NOD_KIND and GEM$NOD_ 
SUB KIND. Kind is a value from the enumerated type 
GEM$NODE_JCINDS which identifies the general kind of 
the node. Subkind is a value from the enumerated type 
GEM$NODE_SUB KINDS which identifies the particular 
kind of the node within the general class of nodes specified 
by kind. Any particular node also has an aggregate type 
determined by its kind field. For example, if kind is GEM- 
$NODE_K_SYMBOL, then the node has type GEM- 
$SYMBOL_NODE. Note that the types associated with 
nodes do not obey the naming conventions described above. 
The interface node types and their associated enumerated 
type constants are defined in the files set forth in Table 4. 

The compiler framework of FIG. 1 supports a simple 
tree-structured symbol table 30, in which symbol nodes are 
linked together in chains off of block nodes, which are 
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arranged in a tree. All symbolic information to be used by 
the compiler must be included in this symbol table 30. There 
are also literal nodes, representing literal values of the 
compiled program; frame nodes, representing storage areas 
(PSECTs and stack frames) where variables may be alio- 3 
cated; and parameter nodes, representing elements in the 
parameter lists of routine entry points. The symbol table 
structure and the contents of symbol table nodes are 
described below. 

The intermediate language is the language used for all 
internal representations of the source code 21, The front end 
20 describes the code of a routine to be compiled as a 
compact intermediate language graph 55, or CILG. This is 
simply a linked list of CIL tuple nodes 35 of FIG. 4 (also 15 
referred to as tuple nodes, or simply as tuples), each of 
which represents an operation and has pointers 38 to the 
tuple nodes representing its operands. Tuple nodes may also 
contain pointers 38 to symbol table nodes. The intermediate 
language is described in more detail below. 20 

The front end 20 must create the internal representation 
22 of the module 21 one node at a time, and link the nodes 
together into the symbol table 30 and IL data structures 55. 
The routines and macros of Table 5, also documented in the 
Appendix, are used to create and manipulate the data struc- 25 
tures of the internal representation 22. 

The back end 12 makes no assumptions about how the 
front end 20 represents block and symbol names. Instead, 
the front end 20 is required to provide a standard call-back 
interface that the back end 12 can use to obtain these names. 30 

Every symbol node has a flag, GEM$SYM_HAS_ 
NAME, and every block node has a flag, GEM$BLK_ 
HAS_NAME. When the front end 20 initializes a symbol or 
block node, it must set its has name flag to indicate whether 35 
a name string is available for it. (Some symbols and blocks, 
such as global and external symbols and top level module 
blocks, must have names.) 

There is a global variable, GEM$ST_G_GET_NAME, 
in the ST package. Before invoking the back end, the front 40 
end must set this variable to the address of a callback routine 
which fits the description set forth in Table 5. 

To compile a source module using the GEM$CO„COM- 
PILE_MODULE interface, a front end (that is, the routing 
GEM$XX_COMPILE) does (in order) each of the activities 45 
described in the following paragraphs. 
1. Create the Internal Representative 

The first task of the front end 20 is to create the internal 
representation 22 of the source module. To begin with, it 
must call GEM$ST_INIT to initialize the symbol table 30 50 
and associated virtual memory zones. It must then read the 
source module 21 from the input stream, using the GEM$TI 
package; do lexical, syntactic, and semantic analysis of the 
source module 21; and generate the symbol table 30 and the 
intermediate language graphs 55 for the module as described 55 
above, using the GEMSST and GEMSSIL routines which 
are documented in the Appendix. 

In addition, the module's source listing may be annotated 
with calls to the GEMSLS shell package, and error's in the 
module may be reported with calls to the GEM$MS pack- 60 
age. 

If the source module 21 contains errors severe enough to 
prevent code generation, then the front end 20 should now 
call GEM$LS_WRITE_SOURCE to write the listing file 
and GEM$ST_FINI to release all the space allocated for the 65 
internal representation 22. Otherwise, it must proceed with 
the following steps. 
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2. Specify the Callback Routines 

Before calling the back end 12 to compile the module 21, 
the front end 20 must initialize the following global vari- 
ables with the addresses of routines that, will be called by the 
back end 12. 

(1) GEM$ST_G„GET_NAME must be initialized to 
the address of a routine that will yield the names of 
symbol and block nodes in the symbol table 30, as 
described above. 

(2) The GEM$SE_J3 global variables must be initialized 
to the addresses of routines that will do source-lan- 
guage defined side effect analysis, as described below. 
The compiler provides a predefined collection of side 
effect routines, suitable for use during the early devel- 
opment of a front end 20, which can be selected by 
calling GEM$SE_DEFAULT_IMPLEMENTATION. 

(3) GEM$ER_G_REPORT_ROUTTNE contains the 
address of the front end's routine for reporting back end 
detected errors, as described below. 

3. Do the Compilation 

When the internal representation is complete, the front 
end 20 can call GEM$CO__COMPILE_MODULE 
(described below) to translate it into target machine object 
representation 23. The front end should then call GEM$LS„ 
WRJTE_SOURCE to list the input stream in the listing file. 
It may also call GEM$ML„LIST_MACHINE_CODE to 
produce an assembly code listing of the compiled module 
23. 

Note that normally, GEM$LS_WRITE_SOURCE has to 
be called after GEM$CO_COMPILE_MODULE so that 
the source listing 21 can be annotated with any error 
messages generated during back end processing. However, 
it is a good idea for the front end 20 to provide a debugging 
switch which will cause GEM$LS_WRITE_SOURCE to 
be called first. This will make it possible to get a source 
listing even if a bug causes the compiler to abort during back 
end processing. 

4. Clean Up 

When compilation is complete, the front end 20 must call 
GEM$CO_COMPLETE__MODULE to release the space 
used for back end processing, and then GEM$ST_FINI to 
release the space used for the internal representation. 

The back end 12 is able to detect conditions during 
compilation which are likely to represent conditions in the 
source program 21 which ought to be reported to the user, 
such as uninitialized variables, unreachable code, or con- 
flicts of static storage initialization. However, a particular 
front end 20 may need to customize which of these condi- 
tions will be reported, or the precise messages that will be 
issued. 

To allow this, the back end 12 reports all anomalous 
conditions that it detects by calling the routine whose 
address is in the global variable GEM$34_G_REPORT_ 
ROUTINE, with the argument list described below. This 
routine is responsible for actually issuing the error message. 

There is a default error reporting routine set forth in the 
Appendix named GEM$ER_REPORT_ROUTINE, whose 
address will be in GEM$ER_G_REPORT_ROUTINE 
unless the front end has stored the address of its own report 
routine there. This default routine has three uses: 

(1) The default routine provides reasonable messages, so 
the front end developers are not obliged to provide their 
own routine unless and until they need to customize it. 

(2) When the front end developers do choose to write a 
report routine, they can use the default routine as a 
model. 
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(3) The front end's routine can be written as a filter, which 
processes (or ignores) certain errors itself, and calls the 
default routine with all others. 

INTERFACE FOR REPRESENTING EFFECTS 5 

As an essential step in detecting common subexpressions 
(CSEs), invariant expressions, and opportunities for code 
motion, the optimizer 26 in the back end 12 must be able to 
determine when two expression tuples are guaranteed to 10 
compute the same value. The basic criterion is that an 
expression B computes the same value as an expression A if: 

1 . A and B are literal references to literals with the same 
value, CSE references to the same CSE, or symbol 
references to the same symbol; or l * 

2. a. A. is evaluated on every control flow path from the 
start of the routine to B, and 

b. A and B have the same operator and data type, and 

c. the operands of B compute the same values as the 20 
corresponding operands of A (obviously a recursive 
definition), and 

d. no tuple which occurs on any path from an evaluation 
of A to an evaluation of B can affect the value computed 
by B. 25 

The optimizer 26 of FIG. 1 can validate criteria 1, 2a, 2b, 
and 2c by itself; but criterion 2d depends on the semantics 
of the language being compiled, Le., the language of source 
code module 21. But since the compiler 12 in the back end 
must be language-independent, a generic interface is pro- 30 
vided to the front end 20 to convey the necessary informa- 
tion. When can the execution of one tuple affect the value 
computed by another tuple? The interface 22 must allow the 
optimizer 26 to ask this question, and the compiler front end 
20 to answer it. 35 

The model underlying this interface 22 is that some tuples 
have effects, and mat other tuples have dependencies. A 
tuple has an effect if it might change the contents of one or 
more memory locations. A tuple has a dependency on a 
memory location if the value computed by the tuple depends 40 
on the contents of the memory location. Thus, the execution 
of one tuple can affect the value computed by another tuple 
if it has the effect of modifying a memory location which the 
other tuple depends on. 

Given the ramifications of address arithmetic and indirect 45 
addressing, it is impossible in general to determine the 
particular memory location accessed by a tuple. Thus we 
must deal with heuristic approximations to the sets of 
memory locations which might possibly be accessed. 

The actual interface 22 provides two mechanisms for the 50 
front end 20 to communicate dependency information to the 
optimizer 26. These are the straight-line dependency inter- 
face and the effects-class interface. 

In the straight-line dependency interface, to determine 
dependencies in straight-line code, the optimizer 26 will ask 55 
the front end 20 to (1) push tuples on an effects stack and pop 
them off again, and (2) find the top-most tuple on the effects 
stack whose execution might possibly affect the value com- 
puted by a specified tuple. 

The straight-line mechanism is not appropriate when the 60 
optimizer 26 needs to compute what effects might occur as 
a result of program flow through arbitrary sets of flow paths. 
For this situation, the front end 20 is allowed to define a 
specified number (initially 128) of effects classes, each 
representing some (possibly indeterminate) set of memory 65 
locations. A set of effects classes is represented by a bit 
vector. For example, an effects class might represent the 
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memory location named by a particular variable, the set of 
all memory locations which can be modified by procedure 
calls, or the set of memory locations which can be accessed 
by indirect references (pointer dereferences). 

For the effects-class interface, the optimizer will ask the 
front end to (1) compute the set of effects classes containing 
memory locations which might be changed by a particular 
tuple, and (2) compute the set of effects classes containing 
memory locations which a particular tuple might depend on. 

Using this effects-class interface, the optimizer can com- 
pute, for each basic block, a bit-vector (referred to as the 
LDEF set) which represents the set of effects classes con- 
taining memory locations which can be modified by some 
tuple in that basic block. 

The optimizer will also ask the front end to (3) compute 
the set of effects classes which might include the memory 
location associated with a particular variable symbol. 

This information is used by the split lifetime optimization 
phase (see below) to compute the lifetime of a split candi- 
date. 

The optimizer 26 uses these interfaces as follows. 
Remember that the reason for these interfaces is to allow the 
optimizer 26 in back end 12 to determine when "no tuple 
which occurs on any path from an evaluation of A to an 
evaluation of B can affect the value computed by B." If A 
and B occur in the same basic block, this just means "no 
tuple between A and B can change the value computed by 
B." This can be easily determined using the straight-line 
dependency interface. 

If the basic block containing A dominates the basic block 
containing B (i.e., every flow path from the routine entry 
node to the basic block containing B passes through the 
basic block containing A), then the optimizer finds the series 
of basic blocks XI, X2, . . . Xn, where XI is the basic block 
containing A, Xn is the basic block containing B, and each 
Xi immediately dominates X(i+1). Then the test has two 
parts: 

1 . There must be no tuple between A and the end of basic 
block XI, or between the beginning of basic block Xn 
and B, or in any of the basic blocks X2, X3, . . , X(n-1), 
which can change the value computed by B. This can 
be easily determined using the straight-line dependency 
interface. 

2. There must be no flow path between two of the basic 
blocks Xi and X(i-t-l) which contains a tuple which can 
change the value computed by B. The optimizer tests 
this with the effects-class mechanism, by computing 
the union of the LDEF sets of all the basic blacks which 
occur on any flow path from Xi to X(i+1), computing 
the intersection of this set with the set of effects classes 
containing memory locations that B might depend on, 
and testing whether this intersection is empty. 

The structure of the interface will now be described. The 
interface routines are called by the back end 12. The front 
end 20 must make its implementation of the interface 
available before it invokes the back end 12. It does this by 
placing the addresses of its interface routine entry points in 
standard global variables. The optimizer 26 can then load the 
routine address from the appropriate global variable when it 
invokes one of these routines. The interface routines are 
documented below with names of the form GEM_SE__xxx. 
The front end must store the entry address of each corre- 
sponding implementation routine in the global variable 
named GEM_SE_G_xxx. 

Tuples that have effects and dependencies are of interest, 
to this interface, Only a few of the IL tuples can have effects 
and dependencies. (Roughly speaking, tuples that do a store 
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can have effects; tuples that do a fetch can have a depen- 
dency; tuples that do a routine call can have both.) 

More specifically, each tuple falls into one of the follow- 
ing categories: 

1 . The tuple does not have any effects, nor is it dependent 5 
on any effects. (Example: ADD). Tuples that fall into 
this class are NOT pushed on the effects stack. Nor are 
such tuples ever passed to GEM__SE_EFFECTS. 

2. The tuple may have effects, but has no dependencies. 10 
(Example: STORE). 

3. The tuple may have dependencies, but does not cause 
any affects. (Example: FETCH). 

4. The tuple both may have effects (out-effects) and a 
separate set of dependencies (in-effects). (Example: 15 
procedure calls) 

5. The tuple may have both effects and dependencies. The 
effects it depends on are identical to the effects it 
produces, (Example: PREINCR). 

A particular tuple called the DEFINES tuple is provided 
to allow a front end 20 to specify effects which are not 
associated with any tuple. One possible use of the DEFINES 
tuple would be to implement the BLISS CODECOMMENT 
feature, which acts as a fence across which optimizations are 
disallowed. The translation of CODECOMMENT would be 25 
a DEFINES tuple that has all effects, and therefore invali- 
date all tuples. 

Argument passing tuples (such as ARGVAL and 
ARGADR) have effects and dependencies. However, the 
effects and dependencies of a parameter tuple are actually 30 
considered to be associated with the routine call that the 
parameter tuple belongs to. For example, in the BLISS 
routine call F(X,.X+Y), the parameter X would have the 
effect of changing X. However, this would not invalidate a 
previously computed value of .X+.Y, since the effect does 35 
not actually occur until F is called. 

The data structure of FIG. 4 representing a tuple is 
accessed by both front end 20 and back end 12, and some 
fields of this structure are limited to only front end or only 
back end access. Every tuple 35 which can have effects or 
dependencies will contain one or more longword fields 42 or 40 
43, typically named GEM_TPL_xxx_EFFECTS or 
GEM_TPL_jtxx_DEPENDENCIES. The field names 
used for particular tuples are described in the section on The 
Intermediate Language. No code in the back end will ever 
examine or modify these fields — they are reserved for use by 45 
the. front end. They are intended' as a convenient place to 
record information which can be used to simplify the coding 
of the interface routines. There is a similar longword field 
named GEM_SYM__EFFECTS in each symbol node of 
symbol table 30, which is also reserved for use by the front 50 
end 20. 

For the straight-line dependency interface, a description 
of the routines will now be given. The front end provides an 
implementation of the following routines: 

GEM_SE_PUSH_EFFECT(EIL_TUPLE: in GEM_ 35 
TUPLE_NODE) — Pushes the EIL tuple whose 
address is in the EIL__TUPLE parameter onto the 
effects stack. 

GEM„SE_POP_EFFECT(EIL_TUPLE: in GEM_ 
TUPLE_NODE)— Pops the topmost EIL tuple from 60 
the effects stack. This is guaranteed to be the tuple 
whose address is in the EIL__TUPLE parameter. Of 
course, this means that the parameter is redundant. 
However, it may simplify the coding of the POP 
procedure for a front end that doesn't use a single-stack 65 
implementation for the effects stack (see the implemen- 
tation discussion below). 



GEM_TUPLE_NODE = 

GEM_SE_FTJVD_EFFECT( 

EIL_TUPLE : in GEM_TUPLE_NODE, 
MIN_EXPR_COUNT: value) 

Returns the most recently pushed tuple whose GEM_TPL_ 
EXPR_COUNT field is greater than MIN_EXPR_ 
COUNT (see below), and whose execution may change the 
results produced by EIL_TUPLE. Returns null (zero) if no 
tuple on the stack affects EIL_TUPLE. May also return the 
same tuple specified in the parameter. 



GEM_TUPLE_NODE = 

GEM_SE„FIND_EFFECTS( 

VAR_SYM : in GEM_SYMBOL_NODE, 
MIN_EXPR_COUNT: value) 

Returns the most recently pushed tuple whose GEM_TPL_ 
EXPR_COUNT field is greater than MIN_EXPR_ 
COUNT (see below), and whose execution may modify the 
value of variable VVAR_SYM Returns null (zero) if no 
tuple on the stack affects EIL__TUPLE. 

GEM_SE_PUSH_EFFECT and GEM_SE_POP_EF- 
FECT will be called only with tuples which can have effects. 
GEM_SE_FIND_EFFECT will be called only with tuples 
which can have dependencies or effects. 

There is an order of invocation. Every EIL tuple has a 
field called GEM„TPL_EXPR_COUNT. This field con- 
tains the index of the tuple in a walk of the EILG in which 
basic blocks are visited in dominator tree depth-first preor- 
der. If the back end 12 calls GEM_SE_PUSH__EFFECT 
with a tuple A, and subsequently calls GEM_SE„PUSH_ 
EFFECT or GEM_SE__FIND_EFFECT with a tuple B, 
without having called GEM_SE„POP_EFFECT with 
tuple A in the interim, then it is guaranteed that either tuple 
A precedes tuple B in the same basic block, or the basic 
block containing tuple A properly dominates the basic block 
containing tuple B. Therefore, the EXPR_„COUNT values 
of tuples on the effects stack decreases with increasing stack 
depth (i.e., more recently pushed tuples have higher EXPR_ 
COUNTs than less recently pushed tuples). This means that 
the FIND_EFFECT routine can cut short its search of the 
effects stack as soon as it encounters a tuple T whose 
EXPR_COUNT is less than or equal to the MIN_EXPR„ 
COUNT argument. This is because all tuples stacked deeper 
than T are guaranteed to have EXPR_COUNTs that are less 
than MIN_EXPR_COUNT. 

The mechanism actually used for the implementation of 
the effects stack is entirely up to the front end 20, as is the 
rule that it uses to determine when the execution of one tuple 
might affect the value computed by another tuple. A naive 
stack implementation is certainly possible, though it would 
probably be inefficient A more sophisticated implementa- 
tion might be built around a hash table, so that multiple small 
stacks (possibly each concerned with only one or a few 
variables) would be used instead of a single large stack. 

The effects-class interface will now be described. Recall 
that an effects set is a bit vector representing a set of effects 
classes, and that an effects class represents some arbitrary set 
of memory locations. Typically, an effects class will repre- 
sent one of the following: 

1. A single named variable. For effective optimization, 
each simple (i.e., non-aggregate) local variable which 
is used frequently in a routine should have an effects 
class dedicated to it. 

2. A set of named variables with some common property; 
for example, in FORTRAN, all the variables in a 
particular named common block. 
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3. A set of memory locations which may not be deter- 
mined until runtime, but which have some common 
property; for example, all the memory locations which 
are visible outside this routine (and which might there- 
fore be modified by a routine call); or, in Pascal, all the 5 
memory locations which will be dynamically allocated 
with NEW calls and which have a particular type. 
The literal GEM_SE_K_MAX_EFFECTS is exported 
by the GEM_SE package. It is the maximum number of 
distinct effects classes that the front end 20 may define. It 10 
will be 128 in the initial implementation. The GEM_SE_ 
EFFECTS_SET type is exported by the GEM__SE package. 
It is a macro which expands to BITVECTOR[GEM_SE_ 
K_MAX_EFFECTSj. Thus, given the declaration X: 
GEM_SE„EFFECTS_SET, the following constructs are 15 
all natural (where 0£N2GEM_SE_K_MAX„EF- 
FECTS-l): 



X[N) = true; 
X[N] - false; 
if .X|N] then . . . 



! Add effects class N to set X. 

! Remove effects class N from set X. 

\ If effects class N is in set X . . . 



20 



The interface routines for the effects-class interface will 
now be described. The front end 20 must provide an 
implementation of the following routines: 25 



GEM_SE_EFFECTS( 

E[L_TUPLE : in GEM_TUPLE_NODE, 
EFFECTS_BV ; inout GEM_SE_EFFECTS_SET) 



30 



The union of the effects of tuple EIL_TUPLE and 
EFFECTS JV is written into EFFECTS_BV. 



GEM_SE_DEPENDENCIES( 

EIL_TUPLE : in GEM_TUPLE_N ODE, 
EFFECTS. _BV : inout GEM_SE_EFFECTS_SET) 



35 



Writes the set of effects classes that EIL_TUPLE depends 
on into EFFECTS _BV. 



GEM_SE_VARIABLE_DEPENDENCIES( 

SYMBOL : in GEM_SYMBOL_NODE, 

EFFECTS _BV : cut GEM_SE„EFFECTS_SET) 



18 



40 



45 



Writes into EFFECTS_BV the set of effects classes that 
might include the memory associated with variable SYM- 
BOL. 

GEM_SE_EFFECTS will be called only with tuples 
which can have effects. GEM_SE_DEPENDENCIES will 50 
be called only with tuples which can have dependencies. 

The compiler may provide implementations for the inter- 
face routines mentioned above, but these routines are not 
intended for use in a production compiler. They are ineffi- 
cient, and their rules for when one tuple invalidates another 55 
probably will not coincide exactly with the semantics of any 
particular language. However, they allow useful default 
optimizations to occur while other components of a front 
end 20 being implemented. 

The EFFECTS field of each symbol node is treated as an 60 
effects class number, between 32 and GEM_SE_K_ 
M AX_EFFECTS . When the address expression of a fetch 
or store tuple has a base symbol, the EFFECTS field of the 
symbol is checked. If it zero, then it is set to a new value 
between 32 and GEM_S E_K„M AX__EFFECTS . 65 

For computing effects sets, using the effects class imple- 
mentation as described above, the front end must call 



GEM_SE_INIT_EFFECTS_CLASSES before invoking 
the GEM_IL_BUILD phase. 

This implementation provides information about effects 
by defining a simple model for effects: 

1 . No variables are overlaid: 

2. Data access operations not in canonical form (as 
defined in CT.006) have (for stores) or depend on (for 
fetches) effect 0. 

3. Calls have effects 32 through GEM_SE_JK_MAX_ 
EFFECTS. ARGADR parameters are treated as if the 
call writes into their address operands. 

Effects classes 0 and 32 through GEM_SE_K_MAX_ 
EFFECTS are reserved. Effect 0 represents references to 
memory such that the variables referenced can't be identi- 
fied (pointer dereferences, parameters, etc.) 

When a variable is first referenced using a data access 
operator in canonical form it is assigned an effects class 
number n in the range 32 to GEM_SE_K_MAX_EF- 
FECTS. The number is recorded in the EFFECTS field of the 
symbol node, The reference and all subsequent references to 
that variable will have effect or dependency n. 

The implementation includes some hooks for experimen- 
tation, testing, etc: 

1 . Tuples that may have effects or dependencies have one 
or more "effects fields" (EFFECTS, DEPENDENCIES, 
EFFECTS_2, etc.) reserved to the front end to record 
the effects and dependencies of the tuple. The compiler- 
supplied effects class callbacks interprets an effects 
field as a bitvector of length 32 representing the first 
word of a GEM_SE__EFFECTS_SET That is, if bit n 
of the field is true, the routines add effects class n to the 
computed effects of the tuple. 

2. The front end can choose the effects class for a variable 
by writing the effects class number between 1 and 
GEM„SE_K_MAX_EFFECTS into the effects field 
of the variable's symbol node. The effects class rou- 
tines do not assign an effects class if the EFFECTS field 
is not zero. 

3. Effects classes 1 through 32 are reserved for use by the 
front end. It may assign any interpretation to those 
effects classes. 

To use the straight-line dependency implementation dis- 
cussed above, the front end must call GEM_SE_INIT__ 
EFFECTS_STACK before invoking the GEM_DF_ 
DATAFLOW phase. This implementation uses the 
information provided by the GEM_SE_EFFECTS and 
GEM_SE_DEPENDENCIES callbacks to determine 
invalidations. That is, GEM_SE_FIND_EFFECT(X) 
returns the most recently pushed tuple Y such that the 
intersection of GEM_SE_EFFECTS(Y) and GEM_SE_ 
DEPENDENCIES (X) is non-null. 

INDUCTION VARIABLES 

According to one feature of the invention, an improved 
method of treating induction variables in a compiler is 
provided. First, the definition and detection of induction 
variables and inductive expressions will be discussed. 

An integer variable V is said to be an induction variable 
of loop L if each store to V that occurs in L: 

1 . increments (or decrements) V by the same amount each 
time it is executed. 

2. is executed at most once in every "complete trip 1 ' 
through the loop. A trip is "complete" if it flows back 
to the loop top. 
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For example, the following code illustrates an induction 
variable V: 



Label L 



V= 1 
IF V > 10 

GOTO LABEL M 
ELSE 

PRINT X 
V = V+l 
END IF 



10 



In the compile function, in addition to finding induction 
variables, we are also interested in inductive expressions. 
Inductive expressions are expressions that can computed as 
linear functions of induction variables. 

Consider the following program; 



DO i = 1,100 
X = I* 8 
T = I - 4 
A[l|=TM 
END DO 



20 



25 



40 



45 



Note that we now have two variables (I and 12) where we 
used to have one. We can eliminate the original loop control 50 
variable completely by recasting the uses of I to be in terms 
of 12: 



12 = 4; 
X * X + 12 
12 = 12 + 4 

if 12 <= 400 GOTO L 



55 



This optimization is known as induction variable elimina- 
tion. 

These optimizations (strength reduction and induction 
variable elimination) operate directly on induction variables. 
In addition to these optimizations, induction variable detec- 
tion provides information to other optimizations such as 
auto-inc/dec, vectorization, loop unrolling, etc. 

In the model used in the compiler of FIG. 1, induction 
variables may be incremented more than once during the 



60 



65 



20 



The expressions "1*8," "1-4;' T' and "T*4" are all induc- 
tive expressions in that they can be recomputed as linear 
functions of I. 

As a brief illustration of some of the optimizations based 
on induction variables, consider the following program 
example: 



1 = 1; * 30 

X = X +■ (4 ♦ I) 

1 = 1+1 

if I<= LOO GOTO L 



variable. Notice that the inductive expression 1*4 increases 
by 4 on each trip through the loop. By introducing a new 
variable, 12, we can replace the multiplication with an 
addition, which is a less expensive operation. This is opti- 
mization known as strength reduction, used in optimizing 
compilers for a long time: 



i = i; 

12 = 4; 
X = X + 12 

1 = 1+1 

12 = 12 + 4 

if I <= 100 GOTO L 



loop. Furthermore, the number of changes can even differ 
with each iteration. In fact, the number of changes can be 
zero for a particular iteration, The loop invariant increment 
value may differ between individual stores, but each indi- 
vidual store must increment the variable by the same amount 
whenever it is executed. 

There are several different categories of inductive vari- 
ables, with different properties, including basic induction 
variables, inductive expressions, and pseudo induction vari- 
ables, 

Basic induction variables are the simplest form of induc- 
tion variable. They have known properties that apply 
throughout the loop. All other induction variables and 
expressions are always built up as linear functions of a basic 
induction variables. Basic induction variables are generally 
modified in the form I=I+q or 1=1— q where "q" is loop 
invariant More generally, however, the requirement is that 
the assignment be of the form I-f(I) where f(I) is a linear 
function of I with a coefficient of 1. 

In the algorithms given in the Appendix, the basic induc- 
tion variables of a particular loop are represented by a set in 
the loop top. In addition to this set, we also maintain the set 
of basic induction variables in the loop that have conditional 
stores that may not be executed on every trip through the 
loop. This inhibits vectorization and can make strength 
reduction more "desirable." 

An inductive expression is either a reference to an induc- 
tion variable or a linear function of another inductive 
expression. Inductive expressions must be in one of the 
following forms: 



-f(I) 




fa) + g(i) 


fCI)-g(I) 


f(0 + E 


E + f0) 


f(I) - E 


E-f(I) 


35 fd)*E 


E*f(I) 



where f(I) and g(I) are inductive expressions derived from 
basic induction variable I with respect to loop L and E is 
invariant in loop L. If there are no stores to I between f(I) and 
the arithmetic operator of which it is an operand, then the 
arithmetic operator is an inductive expression derived from 
basic induction variable I with respect to loop L. 

The other category is pseudo induction variables. Under 
certain conditions, a variable may behave like an induction 
variable on all but the first trip through the loop. These can 
be turned into induction variables (and thus vectorized) by 
peeling the first iteration of the loop. Such variables are 
referred to as "pseudo induction variables.'* This occurs 
when a fetch within the loop is reached only by two stores, 
one within the loop that defines a derived induction variable, 
and another store whose value flows in through the loop top. 
Additionally, it must be guaranteed that all stores within the 
loop are executed once per trip. 

For example: 



D = 50 
DOI=],n 

A|I| = D + . 
D = I + 4 



On the first trip through the loop, D has the value 50 at the 
assignment to L On subsequent trips, D has the value 5,6,7, 
etc. By unrolling the loop once, the subsequent trips can be 
vectorized. Note that the algorithms given herein do not find 
induction variables that are pseudo induction variables. 

In order to identify a basic induction variable the compiler 
must be able to recognize all stores to it. The absence of the 
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"has aliased stores" attribute guarantees this and thus we 
only recognize basic induction variables that do not have 
"has aliased stores." 

Detection of basic induction variables requires the use of 
"sets" of potential induction variables. Doing this dynami- 
cally for each loop is an expensive and complicated opera- 
tion. Instead, we will use the side effect sets used to 
construct IDEF sets. 

A variable "X" is said to be "in" IDEF set S if the all the 
effects that fetch's of X depend on are in S. That is, X is in 
IDEF set S only if GET_VARIABLE_DEPENDEN- 
CIES(x) is a subset of S. 

Note that the presence of X in a basic induction set 
implies only that: 

(a) X is a basic induction variable or 

(b) X is loop invariant and shares IDEF bits with at least 
one variable that is a basic induction variable. 

The algorithm descriptions in the Appendix take the 
following liberties (perhaps more) in the interest of keeping 
the algorithm description simple: (1) The collection of the 
constant pans of the linear function cannot cause an over- 
flow. (2) All stores completely redefine the variable. 

The algorithm as set forth in the Appendix starts out by 
assuming that all variables modified in the loop are basic 
induction variables. Each loop top has a basic induction 
variable set. As we find stores that don't satisfy the require- 
ments for basic induction variables, we eliminate variables 
from the basic IV set of the loop top. 

Since inductive expressions and derived induction vari- 
ables are always functions of basic IVs, we might say that 
fetches of basic IVs are the atomic forms of inductive 
expressions. That is, for an expression to have the inductive 
property it either has inductive operands, or it is a fetch of 
a basic induction variable. 

Using the rules given earlier, we build up inductive 
expressions from simpler inductive expressions based on 
assumptions about basic IVs. The basic IV of an inductive 
expression is always retained with the expression. Thus, 
after the algorithm has run, we can tell whether the expres- 
sion is truly inductive by checking to see that the basic IV 
from which it is derived is still in the basic IV set of the loop. 

The FIND_IV algorithm given in the Appendix will 
become part of the DATAFLOW phase which does a depth 
first dominator tree walk. 

The following is a summary overview of the tuple pro- 
cessing that is done: 



select TUPLEIOPCODE} 
| FETCH | 

If base symbol is still a basis IV candidate 
then 

mark this tuple as being inductive. 

1STORE) 

Let V be the base symbol of the store. 

If the value being stored is not inductive or_else 

the basic IV of the inductive value being stored 

is not V or_clse 

the coefficient of the stored value is not 1 
remove V from the basic IV set of the loop top 

then 

remove V from the basic IV set of the loop top 

then 

mark the store as being inductive 
[ADD. SUB. MTJL, etc.l 

If one operand is inductive and other operand 

is loop invariant 

then 

mark this tuple as being inductive 



The fields added to the tuple data structure, and fields 
added to the flow nodes, to accommodate induction variable 
detection, are set forth in Table 6a. 
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AUTOMATIC CREATION OF KFOLD ROUTINE 

As previously discussed, the programming language com- 
piler of FIG. 1 translates programs written in a source 
language into the machine language of a target machine 25. 
The compiler includes a front end 20, which incorporates 
knowledge of the source language in module 21 being 
compiled, and a back end 12, which incorporates knowledge 
of the machine language of the target machine 25. The front 
end translates programs from the source language into the 

to intermediate language of the ILG 55, and the back end 
translates programs from the intermediate language into the 
target machine language. 

The intermediate language generally specifies a collection 
of operators (for example, add, shift, compare, fetch, store, 

15 or tangent), a collection of data types (for example, "signed 
32-bit integer," "IEEE S -format floating point," or "charac- 
ter string"), and a representation for values of those data 
types. 

One of the optimizations included in the optimizer 26 is 

20 a constant expression evaluation routine. An example of a 
source code listing that may be related to a constant expres- 
sion is shown in FIG. 6, where A and B are found to be 
constants, so A+B is a constant, then I and J are both equal 
.to the same constant. The compiler can do the calculation 

25 (A+B), and save the fetch of A and B separately at run time, 
as well as saving the ADD operation. The I=A+B and 
J-A+B expressions of the code of FIG. 6 are thus both 
represented as merely STORE #9,1 or STORE #9,J. This is 
known as "constant folding" because the constants are 

30 detected, calculated at compile time, and "folded" into the 
object code image. The mechanism for doing this is pan of 
the optimizer 26, referred to as a Kfold routine. 

The compiler of FIG. 1 incorporates a Kfold routine for 
evaluating expressions of the intermediate language to find 

35 these constant expressions. In general, given an operator of 
the intermediate language and the values of its operands, this 
routine will yield the same value which is computed by that 
operator when applied to those values. Such a constant 
expression evaluation routine has many applications in a 

40 compiler. For example, 

(a) The execution speed of the machine code which is 
generated for a program may be improved if some 
expressions of the program can be evaluated by the 

45 compiler itself rather than when the program is 
executed 

(b) Some source languages may allow the use of expres- 
sions with constant operands to represent constant 
values. Compilation of a program in such a language 

50 requires the evaluation of such expressions by the 
compiler. 

(c) If the repertoire of operations provided in the inter- 
mediate language is richer than the set of operations 
provided by the programming language or environment 

55 in which the compiler is implemented, the most con- 
venient way to perform some computation in the com- 
piler may be to represent it as an expression in the 
intermediate language and submit it to the constant 
expression evaluation routine. 
60 The implementation of a constant expression evaluation 
routine may be a matter of considerable difficulty. The IL 
may have dozens of operations (e.g., ADD, STJBT, COSINE, 
etc.), and when distinct data types are considered (e.g., 
INT32, NINT64, FLOAT& etc.), an intermediate language 
65 may have hundreds or thousands of distinct operators. The 
e valuator must be able to apply each of the operations to 
each of the data types correctly, lest the compiler fail to 
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perform its function fully or correctly. Particularly when 
floating-point types are involved, it is likely that not all of 
the operations which can be represented in the intermediate 
language will be directly available in the programming 
language in which the compiler is implemented. Conse- 5 
quently, a constant expression evaluation routine is liable to 
be extremely long, containing hundreds of distinct cases, 
and be highly error-prone. 

According to an important feature of one embodiment of 
the invention, the crucial point is that the one language in to 
which the precise meaning of an operator of the intermediate 
language can always be specified both tersely and precisely 
is the intermediate language itself. That is, the compiler back 
end itself must be capable of generating code which cor- 
rectly implements any operator of the intermediate Ian- 15 
guage. Another way to say this is that compiler back end 
already embodies the knowledge of the sequences of 
machine code instructions necessary to realize the effect of 
each intermediate language operator, and it would be redun- 
dant to have to encode this same knowledge again in a 20 
different form in the constant expression evaluation routine. 

Based upon this concept, according to the invention, the 
mechanical generation of a constant expression evaluation 
routine becomes straightforward: The first step is to create a 
new compiler of FIG. 1, which uses the same back end 12 25 
as the regular compiler, but replaces its front end 20 with the 
special front end described below. (Equivalently, provide a 
special mode for the compiler in which it operates as 
described below.) 

Second, the special front end 20 or special mode of 30 
operation does not read and translate a source program 21. 
Instead, it generates the intermediate language for the con- 
stant expression evaluation routine, as follows: 

(a) The routine does a conditional branch to select a case 
based on the intermediate language operator specified 35 
in the argument list. 

(b) Each case contains the code for a single operator. It 
fetches the operand values from the routine's argument 
list, applies the operator to them, and returns the result. 

(c) Since the routine is being generated directly in the 40 
intermediate language, the code for each case simply 
consists of intermediate language operators to fetch the 
operands from the argument list, then the intermediate 
language operator for the particular case, and then the 45 
intermediate language operators to return the result. 

Third, when this intermediate language graph is submitted 
to the compiler's back end, it will generate machine code for 
the constant expression evaluation routine. 

In the special front end just described, the front end can 
contain a list of all the operators for which cases must be 
generated, and can mechanically generate the intermediate 
language for each case. 

However, the process can be further simplified if, as may 
often occur, the compile back end already contains a table of 
operator information. (For example, such a table may be 
used to check the correctness of the intermediate language 
graph generated by the front end.) It is then possible for the 
special front end to use this table, already provided by the 
back end, to determine which cases to be generated. 6Q 

TYPE DEFINITION 

The compiler of FIG. 1 uses a type definition module 
referred to as the GEM_TD module. GEM_TD provides 65 
the mechanisms used by a front end 20 and back end 12 in 
constructing program type information to be incorporated in 
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an object module for use by a linker or debugger. It is 
intended that this type specification service will allow a front 
end 20 to describe program symbols and their associated 
type information to the object module builder 29 in a manner 
independent of target object file requirements. This type 
specification service acts as a procedural "grammar of 
types" so that the compiler may associate abstract type 
specifications and program symbols. The type specification 
interfaces are defined below, and a number of examples of 
the use of the GEM_TD services are referenced. 

The creation of type information takes place in the context 
of symbol table 30 creation and allows a front end 20 to 
specify an abstract representation of program type informa- 
tion. The object module builder 29 will later use this 
information in constructing Debug symbol table informa- 
tion. 

The GEM_TD module provides service routines that 
allows a front end 20 to describe basic types and derived 
types. These routines typically construct internal data struc- 
tures describing the specified type information. A new 
compiler node type, GEM_TDI, will be defined to manage 
this type information. The definition of the type node data 
structure is private to the compiler 12 and may not be altered 
or examined by the front end 20. When defining a type, the 
front end 20 is returned a "handle" to the type node by the 
GEM_TD routine defining the type. The handle allows a 
front end to associate a type with a program symbol but 
prohibits it from altering or examining the fields of the data 
structure. 

Type nodes will be created and managed by scope, that is, 
when transmitting type information, a front end 20 will 
specify the block node that a type is to be declared within, 
and the shell will be responsible for the management of the 
type nodes within that scope. The shell will manage type 
nodes in a list rooted in the block node in which the type is 
defined. The block node data structure will be expanded to 
define the fields TYPE_LIST_HEAD and TYPE_LIST_ 
TAIL. 

A front end 20 may choose to make on-the-fly calls to the 
type specification service routines or may choose to make a 
pass over the entire symbol table to generate the type 
information. 

After defining a type the front end must associate this type 
information with the symbols of that type. Symbol nodes 
will have a new field DST__TYPE_INFO used to associate 
a symbol with its type. A symbol's DST_TYPE_INFO 
field will contain the address of the type node handle 
returned by a GEM_TD service. A symbol node with a 
DST_TYPE_INFO value of null will have the target speci- 
fied behavior for symbols not having type information. 

Referring to FIG. 7, the data fields and relationships are 
illustrated for the function: 



int toy_procl) 
{ 

float b,c; 



} 



A block node 60 for toy-proc contains fields 61 and 62 
(decl list pointers) pointing to the entries 63, 64 and 65 in the 
symbol table 30. Also, it contains fields 66 and 67 function- 
ing as type list pointers, pointing to the entries 68 and 69 in 
the type list for int and float. The entries 63, 64 and 65 also 
have pointers 70, 71 and 72 pointing to the entries 68 and 69, 
for int and float, as the case may be. 



01/14/2004, EAST Version: 1.4.1 



5,613, 

25 

The GEM_TD type specification service consists of , 
routines to allow a front end 20 to define standard and 
derived types and to associate those types with program 
symbols. The compiler back end 12 will use the resulting 
type definitions and their symbol node associations to gen- 5 
erate target specified Debug Symbol tables. Note that bool- 
ean is not considered a basic type. Compilers for languages 
such as Pascal should define boolean as an enumeration 
containing the elements true and false. 

10 

ACTION LANGUAGE FOR MULTIPASS CODE 
GENERATOR 

A method for doing code generation in the back end 12 by 
code generator 29 using one set of code templates will now 15 
be described, referring to FIG. 8. The selection and appli- 
cation of this one set of code templates occurs at four 
different times during the compilation process. 

1. The PATSELECT phase does a pattern match, block 80, 

in the CONTEXT pass to select the best code tern- 20 
plates. (During this pattern match the UCOMP and 
DELAY optimization tasks are done in parallel as part 
of the pattern matching process.) 

2. The TN AS SIGN and TNLIFE tasks of the CONTEXT 25 
pass use context actions of the selected templates to 
analyze the evaluation order to expressions and to 
allocate TNs with lifetimes nonlocal to the code tem- 
plates, block 81, 

3. The TNBIND pass uses the binding actions of the 30 
selected template's to allocate TNs with lifetimes local 

to the code templates, block 82. 

4. Finally, the CODE pass uses code generation actions of 
the selected templates to guide the generation of object 
code, block 83. 35 

A template is used at different times during a compilation. 
It consists of three major components: 

1. ILG Pattern — which guides the template selection 
process that matches templates to applicable ILG struc- 
tures. 40 

2. Undelayed Actions — which determine the processing 
of matched ILG structures during the CONTEXT, 
TNBIND and CODE passes. The undelayed actions are 
performed when the template is first processed in each 
pass. As a result, the template actions for each ILG 45 
node are processed three different times— once for each 
pass. Some of the actions will have meaning for only 
one pass and will be ignored in the other passes. Other 
actions will have meaning in more than one pass but the 
required processing will be different in each pass. 50 

3. Delayed Actions — which also determine the processing 
of matched ILG structures during the CONTEXT, 
TNBIND and CODE passes. The delayed actions are 
performed each pass when the result computed by the 55 
template is first processed as the leaf of another tem- 
plate. Delayed actions are useful on target machines 
like a VAX that have address modes. Simple register 
machines like a RISC would probably not make heavy 
use of delayed actions. 60 

An ILG pattern of a code generation template consists of 
four pieces of information: 

1. A result value mode (see the examples given in the 
Appendix) which encodes the representation of a value 
computed by the template's generated code. 65 

2. A pattern tree which describes the arrangement of ILG 
nodes that can be coded by this template. The interior 
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nodes of the pattern tree are IL operators; the leaves of 
the pattern tree are either value mode sets or IL 
operators with no operands. 

3. A sequence of Boolean tests. All of these must evaluate 
to true in order for the pattern to be applicable. 

4. An integer that represents the "cost** of the code 
generated by this template. 

The pattern matching or PATSELECT phase matches an 
ILG subtree with the pattern of a template. If more than one 
template pattern can be applied at an ILG node then the 
pattern matcher delays choosing between the alternative 
templates until it knows which one leads to the lowest 
estimated code cost. 

There are three different action interpreters — the CON- 
TEXT interpreter, the TNBIND interpreter and the CODE 
interpreter. The actions of each template are performed in 
three different passes of the compiler by the appropriate 
interpreter. Although the identical template is used in all 
three passes, the semantics of the actions are phase depen- 
dent so that different things are done each pass. Many 
actions have meanings in only one of the three passes and 
they do nothing in the other two passes. Other actions have 
meanings in more than one pass but the semantics of an 
action in one pass are often very different from the semantics 
of the same action in a different pass. However, having only 
one action sequence in a template makes it very easy to 
understand and to maintain the dependencies between the 
various passes. 

The action sequence for each template consists of two 
parts — the undelayed actions and the delayed actions. When 
a pattern of selected ILG nodes is first processed the 
undelayed actions are interpreted. When the ILG pattern is 
later used as the leaf of another ILG pattern then the delayed 
actions are interpreted. 

At the start of interpreting the undelayed actions a table of 
operand variables is created. An operand variable can con- 
tain a temporary name (TN), a literal or a target specific 
address mode. 

Temporary names are each partitioned into one of three 
classes: (1) permanent TNs, (2) delayed TNs and (3) local 
TNs, The class of a TN is determined by its lifetime and 
usage. 

Each TN must have an allocation lifetime. The allocation 
lifetime is begun by the appropriate template action and 
extends along all flow paths leading to the last use of the TN. 
The TNs in the permanent class can have a lifetime that ends 
some arbitrarily large amount of code into the future after 
creation of the TN. The life of a delayed class TN must begin 
in a delayed action of a template and terminate shortly 
afterwards when the TN is used as a leaf. The life of a local 
TN never extends beyond the interpretation of a single 
pattern. 

The class of a TN determines how it is processed. 
Permanent class TNs are created once in the CONTEXT 
pass and the same TN data structure is kept through all three 
passes and is used to store the complicated lifetime descrip- 
tion of the TN. Delayed class and local class TNs have 
lifetimes of very restricted duration so they do not need a 
permanent data structure to track this information. As a 
result, the TN data structure for delayed class and local class 
TNs are built each pass when interpreting the actions and 
deleted immediately after their last use in each pass. Inter- 
preting the same action sequence in each pass guarantees 
identical TN data structures are built in each pass for TNs of 
these classes. 

There will be a large list of different template actions. 
Some of the actions will be target machine dependent. The 
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Appendix contains a list of proposed or example template 
actions, so that a user can by these code template examples 
determine for a particular embodiment what will be needed. 

THE INTERMEDIATE LANGUAGE 5 
REPRESENTATION 

The internal representation used in the compiler frame- 
work 10 of FIG. 1 comprises the symbol table 30 and 
intermediate language graph 55, which are the data struc- 10 
tures created by the front end 20 to represent the structure, 
data, and code of a source module 21. The following 
describes the nodes which are the primitive components of 
these data structures, including a specification of the symbol 
table 30 and intermediate language used in the IL graph 55. 15 
In a compiler as described with reference to FIG. 1, the front 
end 20 generates a symbol table 30 to describe the blocks, 
routines, variables, literal values, etc. of a program con- 
tained in source module 21, and one or more intermediate 
language graphs 55, to describe the executable code. The 20 
following describes these internal data structures. 

The design of the compiler of FIG. I in general, and of the 
intermediate language and symbol table in particular, is 
intended to address a variety of architectures ranging from 
"Complex Instruction Set Computers" (CISC) such as VAX 25 
to "Reduced Instruction Set Computers*' (RISC) such as 
PRISM, MIPS (a 32-bit RISC machine), or an advanced 
64-bit RISC architecture. This design does assume that the 
architecture of target machine 25 has certain basic features. 
First byte organization and addressability are assumed and 30 
Twos-complement binary arithmetic, with "Little-endian" 
bit ordering. "Reasonable" address representation is also 
assumed, i.e., that an address fits in a register. 

In general, the front end 20 can be oblivious to the details 
of the target architecture 25 when creating the intermediate 35 
representation of a program. Most constructs of the inter- 
mediate representation have a well-defined meaning which 
is independent of the target architecture 25. There are some 
issues that must be resolved in implementing the front end 
20, however. First, not all data types will be available on all 40 
architectures, as explained below. Second, arithmetic over- 
flow behavior and the representation of "small integer" 
arithmetic may vary on different architectures, again, as 
discussed below. Third, the behaviors of some operators 
(such as the arithmetic shift operators) are defined only for 45 
subranges of the operand values for which the underlying 
machine instructions are defined on particular architectures. 
For operand values outside this specified range, such opera- 
tors may be well behaved for any particular machine, but 
may have different behaviors on different machines. Lastly, 50 
calling conventions will be different on different target 
systems 25, requiring the front end 20 to generate different 
intermediate representations for the same source language 
constructs in some cases. 

The phrase "Intermediate Language" refers to an abstract 55 
language for specifying executable code. An "Intermediate 
Language Graph" (ILG) 55 is a particular program 
expressed in this language. 

The intermediate language in graph 55 is really a lan- go 
guage of data structures in memory, with pointers providing 
the syntactic structure. However, there is also an approxi- 
mate textual representation for ILGs, used for IL dumps 
written by the compiler as a debugging aid. 

The primitive concept of the IL is the tuple as described 65 
above with reference to FIG. 4 — an ILG 55 is made up of 
tuples 35 representing the operations to be executed. These 
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tuples 35 are tied together by pointers (e.g., operand pointers 
38) which represent various relations. The most important 
relations are the operator-operand relation (a pointer 38 from 
an operator to each of its operands) and the linear ordering 
on all the tuples in each basic block of the ILG, which 
provides a nominal execution order. This linear order is 
represented by the tuple number 40 within a block, and by 
the pointers linking all the blocks of a routine or module. 
The computation defined by an ILG 55 is as follows: 

(1) Start at the BEGIN tuple of the ILG. 

(2) Evaluate each tuple in linear order: fetch the saved 
results of its operands, compute and save its result, and 
perform any secondary action that may be defined for 
it. (There are exceptions to this simple evaluation rule 
for "flow boolean" and "conditional selection" opera- 
tors.) 

(3) After evaluating a branch tuple, continue evaluation at 
the label tuple selected by that branch tuple. 

It should be understood that these rules define the "mean- 
ing" of an IL graph 55. The code generator 29 is allowed to 
rearrange the actions indicated by the ILG, so long as it 
preserves their dependencies, as specified by the following 
rules: 

(1) If the ILG 55 contains an expression, and a statement 
whose execution might affect the value computed by 
evaluating the expression, then the generated code for 
the expression and the generated code for the statement 
must be executed in the same order that the statement 
and the expression occurred in the ILG. 

(2) If the ILG 55 contains two statements whose execu- 
tion might affect the value computed by evaluating 
some common expression, then the generated code for 
the two statements must be executed in the same order 
that the statements occurred in the ILG. 

The question of when the execution of a statement might 
affect the value computed by the evaluation of an expression 
is resolved by reference to the side effects mechanism 
described below. 

The ILG 55 constructed by the front end 20 is not the 
same as the ILG processed by the back end 12. The front end 

20 generates a Compact IL Graph, while the back end 12 
processes an Expanded IL Graph. When the back end 12 
generates code for a routine, the first thing it does is to 
expand that routine's CILG into an EILG. The differences 
between the two forms are several. First, the CIL provides 
"shorthand" tuples, which are expanded into sequences of 
lower-level tuples in the EIL. Second, the nodes which 
represent EIL tuples have many more fields than the nodes 
which represent CIL tuples. The additional fields contain 
information which is used by the back end 12, but which can 
be computed by the IL expander (or by other back end 
phases) from the fields in the CIL nodes. Third, there are 
different structural restrictions on the CILG and the EILG. 
This description is directed to the compact IL, although this 
information generally pertains to both the CIL and the EIL. 

The structure of a symbol table 30 represents the structure 
of the module 21 being compiled. At the heart of the table 
30 is a tree of block nodes representing the blocks, routines, 
and lexical scopes of the module 21; the tree structure 
represents their nesting relationship. Associated with each 
block node is a list of the symbol nodes which are declared 
in that block. Associated with each routine block is an ILG 
55 representing the code for that routine. A symbol node 
represents a symbolic entity in the module, such as a 
variable, label, or entry point. Constant values in the module 

21 being compiled are represented by literal nodes. Literal 
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nodes may be referred both from the symbol table 30 and 
from ILGs 55. The term literal table is also used to refer to 
the collection of all literal nodes that have been created in a 
compilation. Frame nodes represent areas of storage in 
which code and data can be allocated. Generally, these are 5 
either the stack frames of routines or PSECTs. Parameter 
nodes are used to build parameter lists, which are associated 
with entry point symbols. Each parameter node relates a 
parameter symbol in a routine with a location in the argu- 
ment list of an entry point. 
Data Types: 

The intermediate representation used in graph 55 
describes a program for an abstract machine 25, which has 
only a small set of types, the data types which are described 
in the following list. These data types are distinct from the 
data types of the source language of module 21, which are 15 
relevant only to the front end 20. It is the responsibility of 
the front end 20 to determine, for each target machine 25, the 
data types to be used to represent each source language data 
type. 

Data lypes 20 
Null 

Representational 
Scalar 
Address 
Signed Integer 
Unsigned Integer 
Floating Point 
Complex 
Boolean 

The null datatype is a special data type, which is the type 
of tuples that do not compute a value. A representational data 
type is a type whose values have a specific representation in 
the target machine architecture. The representational data 35 
types are divided into scalar data types and aggregate data 
types. A scalar data type is one whose values can be 
represented in a small fixed number of memory locations or 
registers. The scalar data types are subdivided into the 
address data type and the arithmetic data types. Note that the 40 
arithmetic types may be used to represent any other kind of 
data than can fit in the appropriate number of bits. In 
particular, source language character and logical data types 
must be represented with integer data types. There is a single 
address data type, ADDR. A value of type ADDR is repre- 45 
sented as a binary integer with 32 or 64 bits. 

There are signed integer data types INT8, INT16, INT32, 
and INT64, where a value of type INT*" 1 is represented as 
a signed binary integer with x_1 bits, and is therefore in the 
range— (2* _1 ) . . . (2* _1 ). The type INT8 may also be referred 50 
to as IBYTE. The type INT16 may also be referred to as 
IWORD. The type INT32 may also be referred to as ILONG. 
The type INT64 may also be referred to as IQUAD. The 
integer type with the same number of bits as an address may 
also be referred to as I ADDR. The largest signed integer 55 
type supported for the target architecture (INT32 or INT64) 
may also be referred to as IMAX. Any binary scaling (as in 
PL/I) must be provided by the front end — there are no IL 
provisions for a scaled binary data type. 

There are unsigned integer data types UINT8, UINT16, 60 
UINT32, and UINT64, where a value of type UINT^ 1 is 
represented as a signed binary integer with x-1 bits, and is 
therefore in the range 0 . . . (2M ). The type UINT8 may also 
be referred to as UBYTE or as CHAR8. The type UINT16 
may also be referred to as U WORD or as CH AR16. The type 65 
UINT32 may also be referred to as ULONG. The type 
UINT64 may also be referred to as UQUAD. The unsigned 



integer type with the same number of bits as an address may 
also be referred to as UADDR. The largest unsigned integer 
type supported for the target architecture (U1NT32 or 
UINT64) may also be referred to as UMAX. 

The floating point data types are the VAX floating point 
types, REALF, REALD, REALG, and REALH, and the 
IEEE floating point types, REALS, REALT, REALQ, and 
REALE. Not all of these will necessarily be supported on 
any particular target architecture. 

The complex data types are CMPLXF, CMPLXD, 
CMPLXG, CMPLXS, and CMPLXT. A complex value is 
represented as a pair of values of the corresponding real 
type, which represent the real and imaginary pans of the 
complex value. Only complex types which correspond to 
supported floating point types will be supported on a par- 
ticular target architecture. 

A value of an aggregate data type consists of a sequence 
of contiguous elements. An aggregate value is characterized 
by its body, the actual sequence of elements, and length, the 
number of elements in the sequence. The aggregate types 
are: 

(a) Character strings, type STR8, which have elements of 
type CHAR8. 

(b) Extended character strings, type STR16, which have 
elements of type CHAR16. 

. (c) Bit strings, type BITS, whose elements are single bits, 
packed as tightly as possible, 
(d) PL/I and COBOL decimal strings, type DECIMAL, 
whose elements are decimal digits (represented as 
four-bit BCD digits, packed two per byte, with a 
leading sign digit). (The DECIMAL value is charac- 
terized by its precision, the number of digits it contains 
(not counting the leading sign digit), and its scale, the 
number of those digits which are regarded as coming 
after the decimal point 
The elements of an aggregate value are numbered starting 
at zero. (Note that this will require many front ends to 
subtract one when translating a source program string index 
to an IL string index.) 

There is no limit on the number of elements which may 
be processed in a string operation. A flag might be intro- 
duced in the future to allow the front end to indicate 
character string expressions whose lengths were guaranteed 
not to exceed 65535 characters, and which could therefore 
be computed efficiently with the VAX character string 
instructions.) The length word of a varying-length string in 
memory will still be only 16 bits. Decimal strings are limited 
to 31 -digits (plus the sign digit) on all target architectures. 
An example of the details of the representational type 
system for the various target architectures is indicated in 
Table 6. 

There is a single Boolean data type, BOOL. This is the 
type of logical values computed during the execution of a 
program. It does not have a specified physical representa- 
tion. For example, a Boolean value might be represented by 
the value of a binary integer, the value of a processor 
condition code, or the value of the processor program 
counter. In particular, type BOOL does not correspond to 
any logical or Boolean data types that may be present in a 
source language. These must be represented as INT or UINT 
values, and convened to and from type BOOL as necessary. 

The general features that are common to all tuples in the 
intermediate language, and the structural characteristics of 
ILGs 55 (routines in the intermediate language) will now be 
described. 

An ILG 55 is made up of IL tuple nodes (usually just 
called tuples). All tuples contain the fields listed in Table 7. 
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Other fields, known as attributes, occur only in particular 
kinds of tuples. 

Unlike symbol table nodes, which may be allocated with 
an arbitrary amount of space reserved for use by the front 
end 20, CIL tuple nodes will contain only the fields specified 5 
here. EIL tuple nodes will contain additional fields, located 
at a negative offset from the tuple node address, which are 
private to the back end 12. 

10 

Structure of the ILG 

One tuple in an ILG can refer to another tuple in two 
different ways: as an operand or as an attribute. When only 
the operator-operand relation is considered, a CILG is 
directed acyclic graph (DAG), while an EILG is a forest 15 
(i.e., a collection of trees). 

Attribute pointers 39 create additional structure on the 
ILG, and also allow references from the ILG to the symbol 
table 30. The most important structural relation is the linear 2Q 
order of the ILG, defined by the next tuple and prey tuple 
attribute pointers. All of the tuples in a CILG occur in a 
single list defined by the linear order. The tuples of an EILG 
occur in a collection of circular lists, one for each basic 
block. 

25 

The following rules apply to the structure of an ILG. If a 
front end 20 creates a CILG which violates these rules, the 
results are unpredictable, although the back end will attempt, 
where convenient, to detect violations and terminate com- 
pilation: 30 

(a) A tuple whose result type is NULL is referred to as a 
statement tuple, and a tuple whose result type is not 
NULL is referred to as an expression tuple. 

(b) In the CIL: 

(i) A scalar or Boolean expression tuple may be an 3 ^ 
operand of one or more other tuples. An aggregate 
expression tuple must be used as an operand of 
exactly one other tuple, which must be in the same 
basic block (see below). 

(ii) An operand may be an expression tuple, a symbol 40 
node, or a literal node. 

(iii) A symbol node used as an operand always has type 
ADDR. A literal node used as an operand has the 
data type of the literal. 

(iv) A symbol representing a variable which is allocated 45 
to a register does not have an address, in the normal 
sense. However, such a symbol may be used as the 
address operand of a tuple which reads from or 
writes to memory (a FETCH or STORE), in which 
case the tuple will access the indicated register. 50 

(v) If a symbol represents a variable in a stack frame, 
then that stack frame must be associated with the 
current routine or one of its ancestors in the symbol 
table block tree; otherwise, there would be no way of 
finding the stack frame at execution time. 55 

(c) In the EIL operands must be expression tuples, and 
every expression tuple must be an operand of exactly 
one other tuple. 

(d) No statement tuple may be an operand of any other , n 
tuple. 60 

(e) A tuple which is an operand of another tuple must 
precede that tuple in the linear ordering of the ILG. (In 
an EILG, this means that the operand and the operator 
must occur in the same basic block.) 65 

(f) An expression tuple must dominate every tuple which 
it is an operand of. That is, it must be impossible to get 
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from an entry point of a routine to a tuple without 
encountering every operand of that tuple on the way. 
Subsequent paragraphs in this section describe the sorts of 
operations that are available in the intermediate language 
and the operators that are used to represent them. The 
individual operators are all collected in a data structure 
called <REFERENCE>(part_tuple_dictionary), the tuple 
dictionary. Each operator in the dictionary is documented 
using a structured format Table 8 discusses the main cat- 
egories in this format, the information presented under each, 
and the format used to present the information. The format 
section of a tuple specifies the number of operands and the 
allowed operator, operand, and result types in a single line 
of the form: 



op.typc(type-l type-n): result 

where op is the name of the tuple operator, and type specifies 
the allowable operator types. If ".type" is omitted, then the 
operator type must be NULL. Otherwise, type must be on 
eof the following: 

(a) A specific type name (ADDR, BOOL, BITS, IADtiR, 
etc.) indicates that only the specified type is allowed. 

(b) INT, XJINT, REAL, CMPLX, or STR indicates that 
any type belonging to the specified family is legal. For 
example, CMPLX means that CMPLXF, CMPLXD, 
CMPLXG, CMPLXS, and CMPLXT are all allowed; 
STR means that STR8 and STR16 are allowed. 

(c) ALL indicates that any type other than NULL is legal. 

(d) A string of the letters I, U, R, C, A, S, and B indicates 
that any type belonging to a family represented by one 
of the letters is allowed, as follows: 



I INT A ADDR 

U UINT S STR 

R REAL B BITS 

C CMPLX 



The expressions TVpe-1, . . . ,Type-n" specify the allowable 
types of the tuple's operands. If the parenthesized list is 
omitted, then the operator takes no operands. Otherwise, the 
tuple must have one operand for each type in the list. Each 
type-i must be one of the following: 

(a) T means that the operand type must be the same as the 
operator type. 

(b) A specific type name (ADDR, BOOL, BITS, IADDR, 
etc.) means that the operand must have the specified 
type. 

(c) A string of the type code letters I, U, R, C, A, S, and 
B has the same meaning that it does for the type 
specifier. Note that operands with the type specifier IU, 
which means "any integer," are generally convened to 
type IMAX in the generated code. Program behavior is 
therefore undefined if the actual value of such an 
operand cannot be convened to type IMAX. 

(d) If the operator and operand type specifiers are REAL 
. and CMPLX or STR and CHAR, then the actual 

operator and operand types must be consistent. For 
example, the type specification "CADD.CMPLX(T, 
REAL): T* indicates that the second operand must have 
type REALF if the operator type is CMPLXF,REALS 
if the operator type is CMPLXT, etc. If the operator 
type is SB, i.e., character string or bit string, and an 
operand type specifier is CHAR, then the operand type 
must be CHAR8 if the operator type is STR8, CHAR16 
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if the operator type is STR16, and IM AX if the operator 
type is BITS. That is, IMAX is treated as the character 
type corresponding to the string type BITS. 
The actual operands of the tuple must be tuple nodes 
whose result types are consistent with the types sped- 5 
fled by the operand type list. In the CIL, they may also 
be symbol nodes, which are always treated as having 
type ADDR, or literal nodes, which are treated as 
having the types specified by their data type fields. 
The expression "Result" specifies the allowable result 10 
types. If it is omitted, then the operator is a statement 
operator and the tuple's result type must be NULL. Other- 
wise, it is interpreted exactly the same way as the operand 
type specifiers. 

15 

Addresses and Memory References 

An address expression is one of the references in the 
intermediate language. The simplest form of address expres- 
sion is a symbol. That is, an operand field of a tuple node 20 
may contain the address of a symbol node, to represent the 
memory address (or the register) associated with that sym- 
bol. An address value can also be obtained by fetching it 
from memory (a "pointer variable"), by casting an arithmetic . 
value, or by evaluating a preincrement tuple, a postincre- 25 
ment tuple, or one of the tuples of the following list: 





Address Computation Operators 


Operator 


Meaning 


AMINUS 


Subtracts an integer from an address to yield a 




new address. 


APLUS 


Adds an integer to an address to yield a new 




address. 


BASEDREF 


Evaluates the address to yield a new address. 


LITADDR 


Yields ihe address of a read-only memory location 




containing a specified literal value. 


UPLINK 


Yields the address of the stack frame for the 




current routine or a routine that 




contains the current routine. 



30 



35 



40 



45 



A data access tuple is a tuple which causes a value to be 
loaded from or stored into memory. (The word "memory" 
here includes registers in a register set of the target CPU 25. 
The only difference between a register and a normal memory 
location of the CPU 25 is that the "address" of a register can 
only be used in a data access tuple.) The data access 
operators are listed in Table 9. 

In every data access tuple, the first operand is an address 
expression. Every data access tuple also has an offset 5Q 
attribute which contains a longword integer. The address of 
the memory location to be accessed is the sum of the 
run-time address operand and the compile-time constant 
offset attribute. 

All data access tuples will have some or all of the 55 
attributes listed in Table 10. The uses of the effects, effects2, 
and base symbol attributes are discussed in more detail 
below in the section Interface for Representing Effects. 

Another type of reference is the Array Reference. The 
APLUS and AMINUS tuples are sufficient for all address 60 
computations. However, they do not provide any informa- 
tion about the meaning of an address computation. In 
particular, they don't provide any information about array 
references and subscript expressions that might have been 
present in the source code. This information is needed for 65 
vetorization. Therefore, the IL has tuples which specifically 
describe array references. 



For example, given a BLISS vector declared as local X: 
vector[20,long], a reference to .X[.I] could be represented as 



FETCH.INT32(I); 

SUBSCR.IADDR($1, [41, [0]; POSITION = 1); 
FETCH.tNT32(X, S2); 



Given a Pascal array declared as var Y: packed array [1 . 
. . 10, 1 . . . 10] of 0 . . . 255, an assignment Y[I, J]:=Z could 
be represented as 



$1: 


FETCH.INT32(J); 




$2: 


SUBSCR.IADDR(S1, [1J, [01; POSITION = 


1); 


S3: 


FETCH. QNT32(I); 




S4 


SUBSCR.IADDR($3, [10], S2; POSITION = 


2); 


S5 


FETCH.UINT8(Z); 




$6 


STORE.UtNT8(S4-U, S5); 





The basic array reference operators are AREF and SUB- 
SCR. AREF yields the address of a specified element in an 
array. SUBSCR computes the offset of an array element. 

The first operand or an AREF tuple is an address expres- 
sion representing the base address of the array, and its 
second operand is a SUBSCR tuple which computes the byte 
offset from the base address to an element of the array. The 
AREF tuple adds the value of the SUBSCR tuple to the base 
address to compute the address of the indexed element. In 
fact, the code for AREF(origin, subscript) is identical to the 
code for APLUS(origin, subscript). 

A SUBSCR tuple computes the offset of an element along 
one dimension in an array. Its operands are: 

(a) The element index. Individual indices in a subscript 
expression are not normalized for a zero origin. Instead, 
an origin offset to account for non-zero lower bounds in 
the array declaration should be added into the address 
operand of the AREF tuple or the offset field of the 
tuple that uses the element address. 

(b) The stride. This is the difference between the addresses 
of consecutive elements along the dimension. For a 
simple vector of longwords, the stride would be a literal 
4, but for multidimensional arrays, the "elements" of 
the higher dimensions rows (or larger cross-sections) of 
the array. 

(c) An expression for the remainder of the subscript 
expression (that is, for the remaining indices in the 
subscript expression). This must be either another 
SUBSCR expression or a literal node representing the 
integer constant zero. 

The code for SUBSCR(index, stride, remainder) is iden- 
tical to the code for ADD(MUL(index, stride), remainder). 

A SUBSCR tuple also has a position attribute, which 
indicates the position of the index in the subscript list of the 
array reference. It is required that a position number identify 
the same subscript position in all references to a given array. 
For the most effective vectorization, it is recommended that 
position 1 ought to be the most rapidly varying subscript, 
position 2 the next most rapidly varying, etc. 

There are several tuple operators that don't really fit in 
any other section; These miscellaneous operators are the 
following: 
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Operator 


.Meaning 


ADIFF 


Computes the integer difference between two 




addresses. 


DEFINES 


Encodes side effects or dependencies in the ILG 


VOID 


without causing any code to be generated. 


Causes an expression to be evaluated but discards 




it value. 



5 



Arithmetic Tuples: 10 

The arithmetic tuples are used to manipulate "arithmetic" 
values — integers, real numbers, and complex numbers. This 
includes fetching, storing, and conversions, as well as tra- 
ditional arithmetic operations such as addition and multipli- 
cation. 15 

The shift instructions in the VAX and RISC architectures 
are so different from one another that a fully abstract EL shift 
operator would be certain to generate inefficient code on one 
or both architectures. On the other hand, the IL has to 
support shifting, since many source languages have some 2 o 
sort of shift operators. As a compromise, the IL provides the 
following operators (None of the shift operators will ever 
cause an arithmetic overflow exception.): 

(a) SHL, SHR, and SHRA do a left shift, a logical right 
shift, and an arithmetic fight shift, respectively, and „ 
require a positive shift count. (That is, their behavior is 
undefined if the shift count is negative.) These support 
the C shift operators, and map directly into the RISC 
architecture shift instructions. 

(b) SH does a left shift if its operand is positive, or an 
arithmetic right shift if its operand is negative. This 30 
supports the BLISS shift operator, and maps directly 
into the VAX shift instruction. 

(c) ROT is the rotate operator. Although it is described 
differently in the VAX and RISC architectures, the 
actual behavior in all cases can be characterized as a 35 
left rotation whose count is specified by the least 
significant n bits of the count operand, where n is the 
base-two logarithm of the register size. (For example, 
on VAX and MIPS the rotate count is the least signifi- 
cant five bits of the count operand.) 40 

Integer overflow is another feature to consider. There is a 
problem in attempting to specify the sizes for integer arith- 
metic in the IL so that, for all target machines, code will be 
generated that will satisfy the semantics of the source 
language and will be as efficient as possible subject to the 4 5 
constraints imposed by those semantics. In particular, some 
machines (such as VAX) will happily do byte and word 
arithmetic, while RISC machines typically do only long- 
word arithmetic. Doing all the size conversions would be 
wasteful on a VAX, but emulating true byte or word arith- 50 
metic would be inefficient on a RISC machine. 

The following rules are intended to allow the code gen- 
erator sufficient flexibility to generate reasonable code for all 
target machines (Everything that is said about INT types 
below applies equally to UINT types.): 55 

(a) If the result type of an expression is INT'" 1 , the 
compiler may actually perform the indicated computa- 
tion with y-bit arithmetic, where y^x. This might 
produce a y-bit result with more than x significant bits, 

if the original x-bit computation would have over- 60 
flowed. For example, an ADD.INT16 might be imple- 
mented with a 32-bit add. 20000+30000 results in an 
overflow when done as a 16-bit add, but produces the 
legal 32-bit number 50000 when done as a 32-bit add. 

(b) Every arithmetic operator has a suppress overflow flag 65 
(which is only meaningful when the tuple result type is 
INT or UINT). If this flag is set, then the code generated 
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for a tuple must not report any son of overflow condi- 
tion, regardless of the results of the computation, and 
may ignore the possible presence of extraneous high- 
order bits in the result (except when the result is used 
as the operand of an XCVT tuple). Note that the 
suppress overflow flag is defined in tuples (such as 
IAND) for which overflow could never occur anyway. 
Suppressing overflow for these tuples will be particu- 
larly easy. The suppress overflow flag is intended for 
situations where it would be semandcally incorrect for 
an operation to overflow. It may result in more costly 
code on some architectures. On VAX, for example, 
extra code is required to suppress overflow detection. 
Therefore, if it is immaterial whether an operation 
overflows, or if the front end knows that a particular 
operation can never overflow, then this flag should be 
cleared to allow the compiler to generate the most 
efficient code. 

(c) The routine block node has a detect overflow flag. If 
this flag is clear, then the back end is not required to 
generate code to detect overflows in integer arithmetic 
operations. It is free, however, to generate code that 
will detect overflows if this is more efficient — manda- 
tory suppression of overflow detection can be accom- 
plished only by setting the suppress overflow flag in a 
particular tuple. 

(d) If the detect overflow flag is, set in the routine block 
node, then the generated code must guarantee, for each 
expression tree, that either the result computed for that 
expression is valid, or an integer overflow exception is 
signalled. This is not a requirement that overflow be 
detected in every possible subexpression of an expres- 
sion. For example, suppose that A, B, C, and X are 
16-bit variables, and that A is 32767 and B and C are 
L In the assignment X:=A B-C, the generated code 
might compute A+B-C using 32-bit arithmetic and 
then check whether the result is a 16-bit result before 
storing it. This would store the correct answer 32767, 
even though the same expression, if computed with 
16-bit arithmetic, would result in an integer overflow 
error. The assignment X:=A+B, on the other hand, 
would compute the value 32768 correctly, but would 
then generate an overflow exception when it attempted 
to store it into X. The collection of places where 
overflows must be detected is not clear, but certainly 
includes right-hand sides of stores and arguments in 
routine calls. 

(e) Notice also the XCVT conversion operator, which 
returns the value of its operand, forcing any extraneous 
high-order bits of the representation to be consistent 
with the sign of the actual operand. For example, if E 
is- a UINT8 expression which is evaluated using 32-bit 
arithmetic, then XCVT. U1NT8(E:INT16) will be a 
16-bit integer whose high-order 8 bits are guaranteed to 
be zero. In general, if E is an expression of type T, then 
XCVT. T(E:T) can be used to force the representation 
of a value to be consistent with its nominal size. 

(f) If the representation of an integer operand in some 
expression contains high-order significant bits beyond 
the nominal size of the operand, then the generated 
code is free to use either the full represented value or 
the value at the nominal size. When this is not accept- 
able, the front end must generate an XCVT tuple to 
discard unwanted high-order bits from the representa- 
tion. 

There is not any mechanism in the IL to disable the 
detection of floating-point overflow exceptions, A floating- 
point overflow will always result in the signalling of an 
exception. The signalling of floating-point underflow is 
controlled only at the routine level. Routine block nodes 
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have a detect underflow flag. If it is set, the compiler is 
required to generate code which will detect and report any 
floating-point underflows which occur in that routine; oth- 
erwise, the generated code must ignore floating-point under- 
flows. 5 

The conversion operators will compute a value of one 
arithmetic type that is related to a value of another arithmetic 
type. The ROUND and TRUNC operators for real-to-integer 
conversions, the CMPLX operator for real-to- complex con- 
versions, and the REAL and IMAG operators for complex- 
to-real conversions are all familiar. (ROUND and TRUNC 
are also defined with a real result type.) 

CVT is the general purpose conversion operator. It will do 
conversions between any two arithmetic types. It is impor- 
tant to be aware, though, that the only conversions that are 
done directly are UNIT-INT, INT-REAL, and REAL-CM- 15 
PLX (and of course conversions within a type, such as 
INT16-INT32). This means, for example, that a CMPLXG- 
to-UINT16 conversion will actually be done as the series of 
conversions CMPLXG-to-REALG, REALG-to-INT32, 
INT32-to-UINT16. This is not the behavior of VAX Pascal, 20 
which has direct real-to-unsigned conversions. 

XCVT is a special operator which deals only with integer 
types. Like CVT, it yields the value of its result type which 
is arithmetically equal to its operand. However, it has the 
special feature that it will first change the high-order bits of 25 
the representation of the operand so that the operand's 
representation is arithmetically equal to its value. 

For example, consider the expression 



XCVT(ADD.UlNT8([l^g=255],[UI>rr8=2]):INT16). JU 

If the expression is computed with 32-bit arithmetic, then the 
result of the ADD might be a register containing % 
X00000101 (257). The XCVT would then discard the high- 
order bits, leaving % X00000001 (1), which would already 35 
be a valid 1 6-bit signed integer. 

CAST is not really a conversion operator, since it deals 
with bit patterns, not values. A CAST tuple yields the value 
of its result type which has the same bit pattern as its operand 
(truncating or concatenating zero bits if necessary). 40 

Another type is Variable Modification Operators. The 
operators with names of the form OPMOD, where OP is 
ADD, IAND, etc., all have an address operand and a value 
operand. They fetch an arithmetic value from the specified 
address, perform the indicated operation between it and the 45 
value operand, and store the result back at the same address. 
They also yield the computed value. They are intended to 
implement C;s op=operators. For example, the code 
sequence 



SI: ADDMOD.REALF(X, |%F0.IJ); 

S2: STORE, REALF( Y, SI); 



will have the same effect as 



SI: FETCH.REALF(X); 

S2: ADD.REALFCJ 1 , ( %F0. 1 ]) ; 

S3: STORE.REALF(X, S2); 

$4: STORE. RE ALF{Y, 52); 



These operators also have OPMOD A and OPMODX forms, 
which fetch, update, and replace a value in a packed array 
element or a bit field. 
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The PREINCR, PREINCRA, and PREHNCRX operators 
are essentially the same as ADDMOD, ADDMODA, and 
ADDMODX, except that instead of a value operand, they 
have an attribute field containing a compile- time constant 
increment value. They can be applied to addresses (pointer 
variables) as well as arithmetic variables. They are intended 
to implement C's preincrement and predecrement operators. 

The POSTINCR, POSTINCRA, and POST1NCRX opera- 
tors are the same as the PREINCR, and PREINCRX tuples, 
except that the value of the tuple is the value that the 
memory location held before it was updated, rather than the 
value that was stored back into it. They are intended to 
implement C's postincrement and postdecrement operators. 
Strings: 

The string (or aggregate) types of the compiler are types 
whose values are sequences of values from a base type. 
These types are: 

STR8, a sequence of eight-bit characters (type CHAR8). 

STR16, a sequence of sixteen-bit characters (type 
CHAR16). 

BITS, a sequence of single bits. 

DECIMAL, a sequence of decimal digits and an associ- 
ated precision. 

The elements in a character or bit string sequence are 
numbered from 0 to n— 1, where n is the string length. If an 
eight-bit character string is represented in memory at 
address A, then the byte at address A contains the first 
character of the string, the byte at address A+l contains the 
second character of the string, and so on through the byte at 
address A+n-1, which contains the last character of the 
string. If a sixteen-bit character string is represented in 
memory at address A, then the word at address A contains 
the first character of the string, the word at address A+2 
contains the second character of the string, and so on 
through the word at address A+2(n-l), which contains the 
last character of the string. If a bit string is represented in 
memory at address A, then the first eight bits of the string are 
the least significant through the most significant bits of the 
byte at address A+l, etc. 

Aggregate values in general must be represented some- 
where in memory, unlike scalar values which can occur in 
registers, or even as literal operands in machine instructions. 
However, the semantic model of the intermediate language 
is that strings can be fetched, manipulated, and stored just 
like scalars. The compiler is responsible for allocating 
temporaries to hold intermediate string values. 

Note that the code generated for string operations must be 
consistent with this model, even when there is overlap 
between the operands. For example, the IL statement 
STOREF.STR8(A+1,[20], FETCHF.STR8(A,[20]) moves a 
twenty character string up one position in memory. It must 
not simply make twenty copies of the character at A. 

A string is said to be empty if its length is zero. Let head 
be a function that returns the first element of a non-empty 
string, tall be a function that returns the string containing all 
elements except the first of a non-empty string, and empty 
be a function that is true if a string is empty and false 
otherwise. Then the relation between two strings X and Y, as 
tested by the standard comparison operators (EQL, NEQ, 
LSS, LEQ, GTR, GEQ), is defined as follows: 
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If empty(X) A cm pty(Y) then X = Y. 

If empty(X)Vnenipt y (Y) then X < Y. 

If "Vmpty(X) A cmp t y (Y) then X > Y. 

If ~tmpty(X) A -tmply(Y) Ah ea d(X) < head(Y) then X < Y. 

If trapty(X) A tmptyOO ^head(X) > hcad(Y) then X > Y. 

If 1empty(X)Ai em p t y(Y) AhcadfX) = headfY) then rel(XY) = rcKtirilTO.taflCY)). 



The string comparison operators in some languages (such 
as Pascal) operate only on equal-length strings.p adding the 
shorter siring in a comparison to the length of the longer 
string. Therefore, the IL also has padded string comparison 
operators, EQLP, NEQP, LSSP, LEQP, GTRP, and GEQP. 15 

All of the string operators are listed in Table 12. 
Booleans: 

Unlike the representational data types, the Boolean data 
type does not have a unique representation. During program 
execution, Boolean values may be represented explicitly by 2 o 
the value of some bit in a binary integer, or implicitly by the 
particular code path that is taken. Since there is no unique 
representation, it is not possible to have Boolean variables in 
the IL. However, most source languages provide for the 
logical interpretation of representational values, and many 25 
allow the declaration of logical or Boolean variables. There- 
fore, operators are needed to convert between Boolean 
values and their source language binary representations. 

The LB SET operator interprets an integer as a Boolean by 
testing its least significant bit, and the NONZERO operator 30 
interprets an integer as a Boolean by testing whether the 
whole integer is zero or not. The LSBIT operator represents 
a Boolean value as an integer with the bit partem <00 . . . 00> 
or <00 . . . 01>, and the ALLBITS operator represents a 
Boolean value as an integer with the bit pattern <00 . . . 00> 35 
or <1 1 ... 1 1>. These operators support the binary repre- 
sentation of Boolean values in the various source languages 
as follows: 



Source 


Binary 


Boolean 


Language 


to Boolean 


to Binary 


Ada 


LB SET 


LSBIT 


BLISS . 


LBSET . 


LSBIT 


C 


NONZERO 


LSBIT 


FORTRAN 


LBSET 


ALLBITS 


Pascal 


LBSET 


LSBIT 



Even though Boolean values do not have a representation, 
and therefore cannot be represented with normal literal 
nodes, it is very desirable to be able to apply all the regular 50 
IL transformations to Boolean expressions. Therefore, the 
back end 12 provides two special literal nodes, whose 
addresses are contained in the global variables GEM$ST_ 
G_TRUE and GEM$ST_G_FALSE. These literal nodes 
cannot be used for static storage initialization, but they can 55 
be used as operands in an ILG. 

Boolean expressions involving AND and OR operators 
can be evaluated in two different ways, full evaluation and 
flow or short-circuit evaluation. In full evaluation, both 
operands are fully evaluated, yielding real mode values, 60 
which are then used as operands to an AND or OR instruc- 
tion to yield a real mode result. In flow or short-circuit 
evaluation, the first operand is evaluated. If the value of the 
expression is determined by the value of the first operand, 
then the second operand is skipped; otherwise, the second 65 
operand is evaluated and the value of the expression is the 
value of the second operand. 



Some source languages require full evaluation of AND 
and OR expressions; others require (or have special opera- 
tors for) short-circuit evaluation; and still others do not 
specify the kind of evaluation, leaving the choice to the 
compiler. Three sets of operators are provided for these three 
cases: 

(a) LANDC and LORC ("Logical AND Conditional" and 
"Logical OR Conditional") are the flow Boolean opera- 
tors. They evaluate their first operands and then may 
bypass the evaluation of their second operands. 

(b) LANDU and LORU ("Logical AND Unconditional" 
and "Logical OR Unconditional") are the full evalua- 
tion Boolean operators. They behave like normal 
binary operators, computing a result value from two 
fully evaluated operand expressions. 

(c) LAND and LOR ("Logical AND" and "Logical OR") 
are CIL operators which do not specify either the kind 
of evaluation or the order of the operands. During EL 
expansion, they may be replaced either by LANDC and 
LORC or by LANDU and LORU tuples. Furthermore, 
when they are replaced by LANDC and LORC tuples, 
their operands may be interchanged if the cost of 
evaluating their first operands appears to be greater 
than the cost of evaluating their second operands. 

The back end 12 must be able to identify the tuples 
belonging to each operand of a LAND, LOR, LANDC, or 
LORC tuple. In the CIL, the FLOWMARK tuple is used for 
this purpose. All of the tuples associated with the first 
operand of one of these tuples must immediately precede all 
of the tuples associated with the second operand, which must 
immediately precede the Boolean operator tuple itself. The 
first tuple associated with any operand of one of these tuples 
must be immediately preceded by a FLOWMARK tuple. 

For example, 



$1 


FLOWMARK; 


! Start of first operand 


$2 


FETCH(X); 


$3 


GTR($2, (0|); 




$4 


FLOWMARK; 


! Stan of second operand 


$5 


FETCH(X); 


$6 


LSS(S5, [10]); 




S7 


LAND($3. $6); 


! Operator tuple 



The selection operators will select one of two values of 
any type, depending on the value of a Boolean operand. Like 
the logical OR and AND tuples, there are three selection 
tuples: 

(a) SELC will evaluate only its second or its third oper- 
and, depending on whether its first operand is true or 
false. 

(b) SELU will always evaluate all three of its operands, 
and then will select the value of either its second or 
third operand. 

(c) SEL is a CIL operator which does not specify the kind 
of evaluation. It is replaced by either a SELC or a 
SELU operator during IL expansion. 

Also like the logical AND and OR tuples, SEL and SELC 
require that the tuples associated with their operands be 
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contiguous, in operand order, and preceded with FLOW- 
MARK tuples. 
For example 



FLOWMARK; 

FETCH(X); 

GEQ(2, [0)); 

FLOWMARK; 

FETCH(X); 

FLOWMARK; 

FETCH(X); 

NEGCS7); 

SEUS3. $5, S8); 

FLOWMARK; 
FETCH(X); 
GEQ(S2, [0]); 
FLOWMARK; 



S5: FLOWMARK; 
S6: FETCH (X); 
S7: SEUS3, [0|, S6); 



! Slart of first .operand 

! Start of second operand 
! Start of third operand 

! Operator tuple 

! Start of first operand 



! There is no code for the second 
operand 

! Start of third operand 

! Operator tuple - note the second 
operand 
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some branch target tuple in the same routine, to indicate that 
control might be transferred to the basic block that begins 
with that basic block. 

A branch target tuple marks the start of a basic block. All 
branch target tuples have the following attributes: 



Attribute 



Meaning 



20 



Block entry A flag indicating whether this is the entry basic 

block of its scope. 
Label symbol A pointer to the label or entry symbol node which 

is associated with this tuple. 
Scope block A pointer to a block node in the symbol table. 
Volatile A flag indicating that control can reach this basic 

block by some control transfer (such as a 

non-local goto) which is not represented in 

the ILG for this routine. 

A branch tuple marks the end of a basic block and 
specifies its successors. AH branch tuples have the following 
attributes: 



All of the Boolean operators are listed in Table 13. 
Runtime Checking: 

Checking operators verify that some condition is true 
during the execution of the program, and cause an exception 25 
if the condition is not true. Except for the ASSERT operator, 
all of the checking operators return the value of their first 
operand. Every checking tuple has a condition field, which 
specifies the exception to be signalled if the condition is not 
true, and a can be continued field, which indicates whether 30 
control might be returned after the exception is signalled. If 
control returns to a checking tuple after an exception, then 
the checking tuple will return the same value that it would 
have returned if the exception had not occurred. The check- 
ing operators are listed in Table 14. 35 
Flow Control: 

An ILG 55 is made up of basic blocks. A basic block is 
a sequence of tuples beginning with a branch target tuple and 
ending with a branch tuple or a flow termination tuple. A 
basic block is entered only at its beginning, and in principle 40 
all code in it is then executed before control passes out of it 
at its end (but see the discussion of conditional evaluation 
above). 

In a CILG, the basic blocks are concatenated end to end. 
The branch tuple at the end of a basic block may be omitted 
if control flows from it into following basic block, which 
must begin with a LABEL tuple. Similarly, the LABEL tuple 
at the beginning of a basic block may be omitted if there are 
no branches to it. (That is, if the back end sees a LABEL 
tuple which is not preceded by a branch tuple, then it inserts 
a BRANCH to it; if it sees a branch tuple which is not 
followed by a branch target tuple, then it inserts a LABEL 
tuple with a synthesized label symbol.) The IL expansion 
phase produces a circular list of tuples for each basic block, 
with a separate flow graph data structure to represent the 
relations between them. 

Within a basic block, flow implicitly follows the linear 
tuple ordering. Because all flow between basic blocks is 
represented with explicitly flow control tuples, the basic 
blocks of an ILG may be arranged in any order without 
affecting the meaning of a routine. 

The branch target tuple at the beginning of each basic 
block contains a pointer to a label symbol or entry symbol 
node in the symbol table. Control flow between basic blocks 
is represented by a destination list which is an attribute of a 
branch tuple. Each node in a destination list points to a label 
symbol or entry symbol node which is also pointed to by 



Attribute Meaning 



Destination list A pointer to the destination list for the 
branch. 

Target symbol A pointer to a symbol node. This field is used 
in only a few branch operators, and has a 
different meaning in each one, but it will 
always either be null or contain a pointer to 
a label symbol node. 



A destination list is a list of destination nodes, linked 
together by their next fields. The destination list field of a 
branch tuple contains a pointer to the first destination node 
in such a list. (Note that a destination node can occur in only 
one destination list, and a destination list can be pointed to 
by only one branch tuple. Even if two branches have the 
same destinations, they still must have distinct, albeit iden- 
tical, destination lists.) Every destination node has a target 
field, which contains a pointer to a label or entry symbol 
node. A destination node represents a potential transfer of 
control to the basic block whose branch target tuple's label 
symbol field contains a pointer to the same symbol node. 
There are two kinds of destination nodes. Most kinds of 
branch tuples use simple destination nodes, and choose a 
destination based on its position in the destination list. 
BRSEL tuples, however, use selector destination nodes, and 
choose the destination whose selector matches the tuple's 
operand value. A selector destination node has additional 
fields low test and high test, both long word integers. It 
matches an operand value if the operand value falls between 
the destination's low test and high test values. 

Unlike the regular branch operators, which specify a set 
of destinations with a destination list and then select one of 
them based on a tuple operand, the indirect branch operators 
(JUMP and JUMPLOCAL) cause control to be transferred to 
the address specified by an address expression (usually a 
label variable). These would be the operators used for a 
FORTRAN assigned goto or a PL/I got through a label 
variable. 

The back end still needs to know the possible destinations 
of an indirect branch tuple so that it can build the routine 
flow graph correctly. Therefore, indirect branch tuples have 
a destination list, just like regular branch operators. How- 
ever, their destination list contains only a single destination 
(which is optional for JUMP tuples). The target label of this 
destination node identifies a VLABEL tuple which is imme- 
diately followed by a VB RANCH tuple. The destination list 
of the VBRANCH tuple then lists all of the actual possible 
destinations in this routine of the indirect branch. 
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This combination of a VLABEL tuple and a VBRANCH 
tuple is referred to as a virtual basic block. No code is ever 
generated for it (which is why there must not be any other 
tuples between the VLABEL and the VBRANCH). It rep- 
resents the fact that control can pass from the indirect branch 5 
to any of the successors of the virtual block. This has the 
advantage that if many indirect branches have the same set 
of possible destinations, a single virtual basic block can 
represent the possible destinations of all of them. 

There is one other virtual basic block in every routine. 10 
This is the block which consists of the BEGIN and 
ENTRYPTR topics. No code is generated for it, since 
execution always begins at an ENTRY tuple, but it identifies 
all the entry points of the routine for the back end. 15 

A basic block may end with a branch tuple or with a flow 
termination tuple. When control reaches a flow termination 
tuple, it leaves the current routine completely. Since flow 
termination tuples do not transfer control to a destination in 
the current routine, they do not have destination list and 20 
target symbol attributes. 

Note that the JUMP operator is effectively a flow termi- 
nation operator if it does not have a destination list, since 
that means that it does not have any possible destinations in 
the current routine. JUMPS YMBOL is a flow termination 25 
operator which is used to represent a non-local goto to a 
known label in the CIL; in the EIL it is replaced by such a 
non-local JUMP. 

All of the flow control operators are listed in Table 15. 
Routine Calls and Parameter Passing: 30 

There are three types of linkage conventions: control, 
parameter, return value. The phrase "linkage conventions" 
refers to all the rules about the generated code which allow 
a calling routine and a called routine to 4t talk to each other" 35 
properly, Some of these rules are built in to the code 
generator 29. In other cases there are choices, which must be 
made consistently for a calling and called routine. Some of 
these choices will be made by the shell (when it has access 
to both routines); others must be made by the front end 20, 40 
and encoded in the symbol table 30 and ILG 55. 

A control linkage convention defines the instructions 
which must be executed to pass control from a calling to a 
called routine, to establish the execution context of the 
called routine, and to return control to the calling routine. 45 
Control linkage conventions are determined by the INIT- 
CALL and CALL tuples in the calling routine and the entry 
symbol node for the called routine. 

A CALL tuple whose operand is a reference to an entry 
symbol node which isn't an external reference is an identi- 50 
fied call, and there is complete freedom to select the linkage 
for it, even to the extent of compiling the called routine in 
line or generating a customized copy of the called routine. 
For unidentified calls, the calling convention field of the 
INITCALL tuple must specify the control linkage conven- 55 
tion to use for the call. The value of this field must come 
from the enumerated type GEMSCALLING_CONVEN- 
TION, those constants are defined in the following list: 



Constant 


Meaning 


Standard 


Use the standard external call conventions for the 




target system. (This is the only calling convention 




defined for the MIPS implementation.) 


Call 


Use a CALL linkage (VAX only). 


Jsb 


Use a JSB linkage (VAX only). 
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A routine block node has a standard entry field which 
specifies what control linkage convention to use for the copy 
of this routine that will be called by unidentified calls to this 
routine. The value of this field must come from the enumer- 
ated type GEM$ENTRY_CONVENHON, whose con- 
stants are defined in the following list: 



Constant Meaning 

None All calls to the routine are identified calls in the 

current compilation, so it is unnecessary to generate 
an instance of the routine to be called from 
unidentified calls. 

Standard Generate a routine that can be called using the 

standard entry convention. (This is the only calling 
convention defined for the MIPS implementation.) 

Call Use a CALL linkage (VAX only). 

Jsb Use a JSB linkage (VAX only). 



Parameter Linkage Conventions are another type. A rou- 
tine call makes an argument list available to the called 
routine. The argument list is a collection of scalar values 
(often addresses) in locations which are known to both the 
calling and the called routine by agreement (registers, or 
location sin a block of memory whose address is contained 
in some standard register). 

A formal parameter of a called routine is represented by 
a variable symbol node whose is a parameter Sag set. The 
address associated with a parameter symbol is either a 
storage location specified by the calling routine or a local 
storage location which contains a copy of the data passed by 
the calling routine. (Remember that an 1 'address" may actu- 
ally specify a register.) It is derived from the argument list 
and from the mechanism and the semantic flags of the 
parameter symbol, as described below. 

A parameter has bind semantics if the address associated 
with the parameter variable is the address of the storage 
location which was passed by the calling routine (the actual 
storage location). It has copy semantics if the compiler 
allocates storage for it in the called routine (the local storage 
location) and generates copies between the actual and local 
storage locations as needed. (The local storage location of a 
parameter with bind semantics is the same as its actual 
storage location.) 

The compiler will choose whether to use bind or copy 
semantics for a parameter based on the usage pattern of the 
parameter within the routine and on the flags listed in Table 
10-3. ("Alias effects" are discussed in CT0.70, Data Access 
Model. Briefly, they are ways that the actual storage location 
might be accessed, other than through the parameter symbol. 
This includes direct reference to a non-local variable which 
might be the actual storage location, dereference effects, and 
calls to other routines which might access the actual storage 
location.) 

Table 1 7 illustrates the use of the parameter semantic flags 
as they would be set for various source languages. 

A parameter mechanism specifies the relationship 
between what the calling routine wishes to pass to the called 
routine and what is actually stored in the argument list. A 
parameter symbol has a mechanism field which specifies the 
mechanism which is used to pass a value to this parameter, 
and an argument tuple has a mechanism field which specifies 
the mechanism by which this argument is to be passed. The 
values of these fields must come from the enumerated type 
GEMSMECHANISM, whose constants are listed in Table 
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If a parameter variable's unknown size flag is false, then 
the size of the parameter is known at compile time, and is 
specified by its size field. If unknown size is true, then the 
size of the parameter is not known at compile time. The size 
of an unknown size parameter can be determined at run time 5 
if it has the array, string, or address and length (reference 
with associated length parameter) mechanism. When a sepa- 
rate length word is passed with the address and length 
mechanism, and the parameter has an aggregate data type, 
the length argument is interpreted as the parameter size in J(J 
elements (bits or characters), not in bytes. Furthermore, if 
the parameter is a character string whose string representa- 
tion is varying or asciz, then the size is a maximum size, not 
the string's current size, and applies only to the test part of 
the string, and not to the space that is required for the suing 
length word or null terminator. Note that a parameter cannot 15 
have copy semantics unless the compiler know how much to 
copy. If the actual parameter size is neither known at 
compile time nor computable by the compiler at run time, 
then the front end must set the parameter's must bind flag to 
force the use of bind semantics. 20 

Another type is Return Value Linkage Conventions. A 
called routine can return information to its caller in two 
ways. The first is by using an output parameter. This is a 
variable which is passed with a mechanism other than value, 
so that the called routine can store a value into it. The second 25 
way is with a return value. A return value is a value which 
is computed by the called routine and "returned" to the 
caller, where it becomes available as an expression value 
through a special result tuple. 

Scalar values can be returned in registers. For example, 30 
almost all of our languages return arithmetic function values 
in a standard register; and the BLISS "output parameter" 
feature allows a routine to return values in arbitrary regis- 
ters. 

For a routine to return a string, there must be tuples in the 35 
argument list to allocate a temporary buffer for the return 
value and to pass its address to the called routine, tuples in 
the called routine to store the return value into the buffer, and 
tuples in the caller to make the retrieve the value from the 
buffer. 40 

When the size of a returned string is determined by the 
called routine, the caller cannot just allocate space for the 
result, since it does not know in advance, how big the result 
will be. The mechanisms listed in Table 19 provide for this 
possibility. These mechanisms are provided through special 45 
tuples. However, their availability depends on the calling 
standard of the target environment. 

The caller may: (a) require that the called routine return 
a value by fixed buffer; (b) require that the called routine 
return a value on the stack; (c) request that the called routine 50 
return a value by dynamic string, but accept a string returned 
on the stack if the called routine so chooses. The called 
routine must always be prepared to return a dynamic-size 
result by fixed buffer or on the stack if the caller requires it. 
It must also be prepared to return a result either by dynamic 55 
string or on the stack when the caller requests a result by 
dynamic string. 

Representation of routine calls in the CIL will now be 
considered. There are many distinct operations involved in 
calling a procedure or function. Any of the following steps 60 
may be necessary.: 

(a) Allocate space for the argument list. 

(b) Allocate space for pass-by-value operand expression. 

(c) Allocate space for descriptors. fi5 

(d) Create argument descriptors. 

(e) Create argument descriptors. 
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(0 Allocate space for result values. (A result value, or 
output argument, is an argument which does not exist 
until after the call. In the IL, a function will be treated 
as a procedure with a result value.) 

(g) Create the argument list. 

(h) Call the routine. 

(i) Release space that was allocated for arguments, 
descriptors, and the argument list. 

(j) Get the result values from the call. 

(k) Free the space that was allocated for the result values. 

The general strategy taken in the IL is to provide separate 
operators for the different operations involved in doing a 
call, but to require that these be tied together in a specified 
fashion. A routine call in the IL consists of: 

1. An INITCALL statement, which flags the beginning of 
the series of actions which will make up the call. 

2. A series of argument and temporary allocation state- 
ments which will construct the argument list. 

3. A call statement (CALL or BPCALL) which actually 
effects the transfer of control to the called routine. 

4. A series of result tuples which make the call's return 
values accessible. 

The INITCALL and call statements are mandatory; the 
argument list and result tuples are optional. All of the tuples 
involved in a call must occur in the same basic block, and 
any result tuples must follow the call tuple immediately, 
with no intervening tuples. There are no other restrictions, 
though, on what tuples may occur between the INITCALL 
and the call. The IL for a routine call may even be contained 
within the argument list IL for another call. 

Constructing the argument list involves allocating space 
for the argument list itself, for addresses and descriptors of 
arguments, for temporaries to hold values being passed, and 
for output arguments. It may also involve initializing the 
allocated space. These activities are specified in the IL with 
argument tuples. All argument tuples have names beginning 
with ARG, and have the attributes listed in Table 20. 

When the calling routine has a value to pass, it uses one 
of the argument tuples whose names begin with ARGVAL. 
With these tuples, the actual argument value is specified as 
an operand of the argument tuple. Note that this does not 
necessarily mean that the argument is passed using the value 
mechanism. If the mechanism is value, the operand value is 
stored directly into the argument list; otherwise, a temporary 
is allocated, the operand value is stored into the temporary, 
and the temporary is passed by reference or descriptor. (This 
is like % REF in BLISS.) The value mechanism will only be 
supported with the ARGVAL tuple with scalar types, and 
with the ARGVALA tuple with a compile-time constant size. 

When the calling routine has the address of an existing 
store location to pass, it uses on eof the argument tuples 
whose names begin with ARGADR. With these tuples, the 
address of the actual storage location is specified as an 
operand of the argument tuple. Thus, the value mechanism 
cannot be used with these tuples. Since the occurrence of 
one of these tuples in an argument list can cause the called 
routine to read from or write to a storage location known to 
the current routine, these tuples can have dependencies and 
side effects, and therefore have the offset, effects, effects2, 
and base symbol fields that are used in all memory reference 
tuples, as well as the special flags parm is read and parm is 
written, which indicate whether the compiler should assume 
that the called routine might read from and/or write to the 
storage location. 

When an argument tuple specifies the general mechanism, 
a code is generated to allocate space for the descriptor and 
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to fill in its base address field. The front end must explicitly 
specify any other fields that are to be initialized in the 
descriptor. It does this using DSCFIELD tuples, which refer 
back to a preceding argument tuple with the general mecha- 
nism and specify a value to be stored into a field in the 5 
descriptor that was allocated for that argument. 
Constructing an Argument Block: 

Some RTL linkages may require that a collection of 
arguments be passed in an argument block, whose address is 
passed to the RTL routine like an ordinary reference param- 
eter. This is accomplished using three special tuples. 

(a) ARGBLOCK is an argument tuple which allocates a 
block of a specified size on the stack and passes its 
address to the called routine. The block can be initial- 
ized using BLKFIELD tuples. 

(b) A BLKFIELD tuple is like a DSCFIELD tuple, except 15 
that it refers back to a preceding ARGBLOCK tuple 
instead of to an arbitrary tuple with the general descrip- 
tor mechanism. It stores a value into a field of the 
argument block. 

20 

(c) ARGDEFDNES is like an argument tuple, except that 
it doesn't generate any code. It allows the front end to 
specify argument-like side effects which are not asso- 
ciated with a regular argument tuple. In particular, it 
can be used to indicate the effects associated with 2 5 
arguments which have been passed through an argu- 
ment block. 

For a routine to return an aggregate value, it must store 
that value into a location that has been allocated by its caller. 
The tuples whose names begin with ARGTMP will allocate 30 
a block of storage of a specified size and pass its address to 
a called routine. They are the same as the ARGADR tuples, 
except that the ARGADR tuples pass the address of an 
existing block of storage, and the ARGTMP tuples pass the 
address of a temporary that has been allocated especially for 35 
the call 

The ARGBUF, ARGSTK, and ARGDYN tuples will 
allocate the temporaries and pass the special descriptors 
necessary to obtain a dynamic string return value. These 
tuples have all the usual argument tuple attributes, but their 40 
mechanism attribute is ignored, since the mechanism is 
implied by the use of the dynamic return value mechanism. 

The tuples whose names begin with RESULT will make 
the return values from a routine call accessible in the calling 
routine. Their effect is to move the output parameters from 45 
the temporary locations or registers where they have been 
returned by the called routine into more lasting temporaries. 
The value of a result tuple is simply the value of the return 
value that it has retrieved. All the result tuples for a call must 
immediately follow the call tuple. 50 
Bound Procedure Calls: 

A bound procedure value, or BPV, represents the infor- 
mation needed to call an unknown routine. Since routines 
may contain uplevel references to stack allocated variables 
in other routines, a bound procedure value must incorporate 55 
not only the code address of the routine to be called, but also 
sufficient information to construct a static link for it. 

Unfortunately, BPVs are handled very differently in dif- 
ferent software architectures — how they are created, how 
they are represented, how they are called, and even how big gQ 
they are. Therefore, the compiler will not attempt to provide 
a consistent representation. Instead, the front end will be 
expected to generate differing code, depending on the target 
software architecture. 

(a) In the VAX and MIPS software architectures, a BPV 65 
is simply a code address and a context value, and a 
bound procedure call is done by loading the context 
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value into a specific register and then doing a call to the 
code address. Therefore, the front end will be respon- 
sible for representing a BPV as a pair of independent 
address values. The code address is obtained with a 
BPLINK tuple. A call to a BPV should be represented 
as a CALL whose address operand is the code address 
value, with the context value passed by value as a 
special register argument in the architecture's static 
link register. 

(b) On RISC machines as referred to, all procedures are 
represented by descriptors which contain a code 
address along with some additional information, and a 
BPV is simply the address of a special descriptor, 
constructed at run time, which contains a context 
pointer and the address of an RTL routine to load the 
context pointer and call the real routine. The front end 
will have to allocate space for such a descriptor itself, 
and use the BPVAL tuple to fill it in. Then the BPV is 
represented by the address of the descriptor, and a call 
to the BPV should be represented by a call to that 
address. 

It is necessary for the back end 12 to know what the 
parameters are for each entry point in a routine. The front 
end 20 accomplishes this by setting the param list and param 
list tail fields of each entry symbol node to point to the first 
and last nodes in a list of parameter nodes (linked by their 
next fields) that represents the parameter list of that entry 
point. 

Each parameter node has a symbol field which points to 
a parameter symbol node of the routine that contains the 
entry point, and arg location, pass by register, and special 
register fields which have the same meaning that they do in 
argument tuples (see Table 20). Thus, the list of parameter 
nodes identifies all the parameters of an entry point and 
where they occur in that entry point's argument list. 

Note that a parameter symbol may occur in more than one 
parameter list, possibly with a different arg location in each. 
Parameter nodes do not have a mechanism field, however, 
since the mechanism is regarded as an attribute of a param- 
eter symbol rather than of its occurrence in a particular 
argument list. 

The RETURNREG tuple returns a scalar value in a 
specified register, and the RETURN STK and RETURN- 
DYN tuples return a string value using one of the, dynamic 
string return mechanisms provided in the PRISM calling 
standard. Note that no special tuples are needed for a called 
routine to return a value through an argument temporary, 
since there is no difference between returning a value 
through an argument temporary and storing a value into an 
ordinary output parameter. 

The address associated with a parameter symbol is the 
address of the parameter's local storage location. The called 
routine can obtain the address of the descriptor for a param- 
eter with the general descriptor mechanism by using the 
DESCADDR tuple. It can obtain the actual size of an 
unknown size parameter using the SIZE tuple, provided that 
the size is available in the argument list (either in a descrip- 
tor or in a separate size parameter). 

All of the operators involved in routine calls are listed in 
Table 21. 

Storage Allocation and Scoping: 

A lexical block is a range of a source program over which 
a set of declarations is valid — for example, a routine, 
subroutine, function, or begin-end block. In the symbol 
table, the. lexical structure of a routine is represented by a 
tree of scope block nodes whose root is the routine block 
node. Each basic block in the ILG contains code belongng 
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to a single lexical block. The branch target tuple at the start 
of a basic block has a scope block field which points to the 
corresponding block node in the symbol table. Every lexical 
block in a routine must have a unique scope entry basic 
block, which is the only basic block in the lexical block to 
which control can pass from any basic block outside that 
lexical block. This scope entry basic block is identified by 
the block entry flag in the branch target tuple. 

A reference to a variable symbol in the CIL always yields 
the address of a storage location (or the name of a register): 

1. A static variable is one whose storage class is static, 
global ref, or preserved. Static variables are located in 
some PSECT at compile time, so that every reference 
to such a variable will refer to the same location. 

2. A local variable is one whose storage class is automatic, 
stacklocal, register, or register preferred, and whose 
unknown size flag is false. Local variables exist only 
during a single execution of their lexical scope,' and 
may have multiple instances if multiple instances of 
their lexical scope may be executing simultaneously. 
They are allocated at compile time to registers or to 
known locations in their routine's stack frame. 

3. A dynamic variable is one with the same storage class 
as a local variable, but whose unknown size flag is true. 
Like local variables, dynamic variables exist only dur- 25 
ing a single execution of their lexical scope, and may 
have multiple instances if multiple instances of their 
lexical scope may be executing simultaneously. They 
are allocated on the stack at run time by a CREATE 
tuple, and are accessed through an associated pointer 30 
variable which is created by the back end. 

4. Parameters with copy semantics behave like local or 
dynamic variables, depending on the setting of their 
unknown size flag: 

5. Parameters with bind semantics are not allocated in the 35 
called routine at all. They are accessed through an 
associated pointer variable which is created by the back 
end to hold the actual storage location address. 

A tuple in a lexical block may refer to any variable which 
is declared in that lexical block, or in any of its ancestors in 
the symbol table block tree. There are no problems referring 
to variables in the current routine, of course. Static variables 
of another routine can be referred to directly. Local and 
dynamic variables of other routines require a "static chain" 
to locate the stack frame in which the variable is declared. 
However, the back end 12 is completely responsible for 
generating the code for creating and using static chains, 
provided that the front end correctly annotates the routine 
blocks and variables. 

There are several kinds of dynamic stack allocation: 

1. The stack storage for a dynamic variable is allocated by 
a CREATE tuple, it exists from the execution of the 
CREATE tuple until control passes into a basic block 
which is not in the same lexical block as the CREATE 
tuple. (This means that the CREATE tuple for a 
dynamic variable must be allocated in a basic block 
whose scope block is the block in which the variable is 
declared; otherwise, its dynamic storage will be 
released while the variable is lexically still in scope.) 

2. Code to allocate the stack storage for an unknown size 
copy parameter is generated immediately following the 
ENTRY tuple. Since ENTRY tuples must be in the 
main routine block, this storage exists until the routine 
returns. 

3. A dynamic temporary may be created by the back end 
to hold the value of an aggregate expression. It exists 
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from the execution of the tuple which creates the value 
at least until the execution of the tuple which uses that 
vale. 

4. Stack space is allocated to hold the argument value for 
an aggregate ARGVALx tuple, it exists from the execu- 
tion of the ARGVALx tuple until the execution of the 
CALL tuple. 

5. Stack space is allocated to hold a return value for an 
ARGTMPx tuple. It exists from the execuiton of the 
ARGTMPx tuple until the evaluation of the RESULTx 
tuple which fetches the return value. 

While this invention has been described with reference to 
specific embodiments, this description is not meant to be 
construed in a limiting sense. Various modifications of the 
disclosed embodiments, as well as other embodiments of the 
invention, will be apparent to persons skilled in the art upon 
reference to this description. It is therefore contemplated that 
the appended claims will cover any such modifications or 
embodiments as fall within the true scope of the invention. 

TABLE 1 

PREFIXING CONVENTIONS FOR GLOBAL 
AND EXPORTED NAMES 

Names exported from packages 

Routine names have the form GEMSZZ_name. 
Exported macro names have the form GEMSZZ_namc. 
Global variable names have the form GEMSZZ_name. 
Literal names (whether global or exported) have the form 
GEM$ZZ_K„name, 
Enumerated data types 

Every enumerated data type has a unique "type name." 

Each literal in Ihe type XYZ has a name of the form 

GEM$XYZ_K_name. 

The names GEMSXYZ_K_FIRST and 

GEM$XYZ_K__LAST re f er to the first 

and last values in the range of the type. 

Aggregate data types 

Every aggregate data type has a unique "type name." 

Each field in the aggregate type XYZ has a name of the form 

GEMS XYZ_ name. 

Sires of particular valiants of an aggregate type are literals 

with names of the forms GEMSXYZ_name_SIZE 

The size of an aggregate type as a whole (i.e., the size of 

its largest variant) is GEMSXYZ_SIZE 

The name GEMSXYZ refers to the type declaration macro, 

whose expansion is BL0CK|GEMSXYZ_S1ZE, 

BYTE]FTELDS(GEMSXYZ_FIELDS). 
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TABLE 2 

DATA TYPES OF SHELL ROUTINE ARGUMENTS 

Integer 32-bit (longword) signed integer. Passed by value. 

String A varying string (16-bit unsigned length word 4* text). 
Passed by reference. 

Handle A 32-bit (longword) value which is interpreted by 
the shell routines (often as the address of a shell 
internal data structure), but which has no meaning 
to the front end. Passed by value. 

Block Some data block whose structure is defined in the 
shell package specifications, and whose contents 
are used to communicate between the front end and 
the shell. Passed by reference. 

Counted A 32-bit unsigned count word, followed by the 

vector specified number of 32-bil components. 

The components of a vector may be integers, 
addresses of varying strings, handles, or 
addresses of blocks. Passed by reference. 
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TABLE 3 



GEMSXX_INIT 

is called by the shell 11 almost as its first action. (The only things 

the shell does before calling GEMSXX_INIT are to 

start the timing interval GEMSTM_G_ICB_CMPTTL 

(see <REFERENCE>($ect_sheU_tm)), initialize 

the debugging package (see <REFERENCE>(scct_shell_db)), 

and initialize the global variable GEMSCP_G_ERROR_FCB 

to the output file handle of the "standard error" file. 

On return from GEMSXX_tNTT, all the GEMSXX global 

variables listed below must be properly initialized. Other 

front end initialization may also be done in GEMSXX_IN1T I 

or it may be postponed until GEM$XX_PROCESS_GLOBALS 

(see below). 

Since the shell 1 1 docs not do any command line processing until 
after calling GEMSXX^INIT, it is possible under 
VAX/VMS to implement a GEM compiler with a foreign 
command instead of a DCL command by having 
GEMSXX_INIT 

call L!BSGET_FOREIGN lo read the command line and 
CL1$DCL_PARSE to set the command string that the 
shell will process. 

GEMSXX_FROCESS_GLOBALS 

is called by the shell after it has processed the global qualifiers 
from the command line, but before it has processed any 
command-line parameters or local qualifiers. This routine 
can examine the global qualifier blocks and take whatever 
action is appropriate. 
GEMSXX_PROCESS_LOCALS 

is called by the shell 11 after it has processed the local qualifiers 
from the command line, but before it has opened any files 21 
specified by them. This routine can examine the local qualifier 
blocks and change their contents as desired. This allows for 
dependencies between qualifiers thai cannot be represented in 
the individual qualifier blocks. 
OEM$XX_COMPILE 

is called by the shell 1 1 after it has parsed a parameter phis-list 
and its qualifiers, filled in the local qualifier blocks, and 
initialized GEMSTI with the input stream specified by the 
plus list. This routine is responsible for compiling that input 
stream. 

GEMSXX_FINI 

is called by the shell as its very last action before it exits. This 

routine may do any fronl-end-specific clean-up. 

The front end must also declare the following global variables. 

They must be defined by the time that GEMSXX_INIT 

returns control to the shell 11. (They may be defined at link 

time, but this will require address fixups at image activation 

time.) 

GEMSXX_G_GLOBAL_QUALS 

contains the address of a counted vector of pointers to the 

qualifier blocks for the compiler's global qualifiers (see 

<REFERENCE>(sect_sheU_cp)). 

These global qualifier blocks will be filled in by the shell 

before it calls GEM$XX_PROCESS_GLOBALS. 
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TABLE 3 -continued 



GEM$XX_G_LOCAL_QUALS 

5 contains the address of a counted vector of pointers to the 
qualifier blocks for the compiler's local qualifiers (sec 
<REFERENCE>(sect_shell_cp)). 
These local qualifier blocks will be filled in by the shell 
before each call to GEMSXX_OOMPILE. 
GEM$XX_G_FAC_PREFIX 

10 

contains the address of a varying string containing the facility 
string to be used in constructing compiler messages. 
GEM$XX_G_JAC_NUMBER 

contains the integer facility code to be used in constructing 
. compiler message codes. 

GEM$XX_G_IN_DEFAULTS 

contains the address of a counted vector of pointers to varying 
strings containing the default file specifications to be used when 
opening source files specified in the command line parameters. 
GEMSXX_G_LIB_DEFAULTS 
20 

contains the address of a counted vector of pointers to varying 
strings containing the default file specifications to be used 
when opening text libraries specified as command fine parameters 
with the /LIBRARY qualifier. 
GBMSXX_G_PRODUCT_ID 
25 ~~ 

contains the address of a varying string containing the product 
identification string to be used in header lines in the listing file. 
GEMSXX_G_PREFIX_LEN 

contains an integer specifying the number of columns to be 
30 reserved for a prefix string (specified by the front end) to be 
attached to source lines in the listing file. 
The Virtual Memory Package (GEMSVM) 

The virtual memory package provides a standard interface for 

allocating virtual memory. It supports the zoned memory concept 

of the VMS LIBSVM facility; in fact, under VMS, GEMSVM 

is an almost transparent layer over LIBSVM. 

However, the GEMSVM interface is guaranteed to be supported 

unchanged on any host system. 

The Locator Package (GEMSLO) 

A locator describes a range of source text 15 (starting and 
ending file, line, and column number). The text input package 
returns locators for the source lines that it reads. 
Locators arc also used in the symbol table 16 and 
intermediate language nodes to facilitate message and 
debugger table generation, and are used for 
specifying where in the listing file the listing package 
45 should perform actions. A locator is represented as 
a longword. The locator package maintains a locator 
database, and provides routines to create and interpret 
locators. 
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TABLE 4 



INTERMEDIATE LANGUAGE DEFINITION FILES 



GEM$ND_NODES.SDL 



GEM_CONSTANTS.DAT 



GEM_CONSTANTS.SDL 



Contains several general 
type definitions, and includes 
all the SDL files listed below. 
It defines the generic 
GEMSNODE aggregate type. 
Contains the definitions 
of the node land and node 
subkind enumerated types, as 
well as a variety of other 
enumerated types. 
The SDL translation of 
GEM_CONSTANTS.DAT 
See Appendix D for a description 
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INTERMEDIATE LANGUAGE DEFINITION FILES 



BLK_NODE.SDL 



S YM_N ODE. SDL 



FRM„NODE.SDL 



LIT_NODE.SDL 



PRM_NODE.SDL 



TPL_NODESDL 



DES_NODE.SDL 



GEM5ND.L32 



of the CONSTANTS program 
which does the translation. 
Contains the definition of block 
nodes (GEMSBLOCK_NODE), 
identified by a value of 
GEMSNODE_K„BLOCK 
in the node's kind field. 
Contains the definition of symbol 
nodes (GEMSSYMBOL_NODE), 
identified by a value of 
GEMSNODE_K_SYMBOL 
in the node's kind field. 
Contains the definition of 
frame nodes 

(GEM$FRAME_NODE), 
identified by a value of 
GEMSNODE_K_FRAME 
in the node's kind field. 
Contains the definition of 
literal nodes 

(GEM$LITERAL_NODE), 
identified by a value of 
GEM$NODE_K_LITERAL 
in the node's kind field. 
Contains the definition of 
parameter nodes 
(GEM$PARAMETER_NODE) ( 
identified by a value 
of GEMSNODE_K_PARAMETER 
in he node's kind field. 
Contains the definition of 
tuple nodes 

(GEM$TUPLE_NODE), 
identified by a value of 
GEMSNODE_K_ClL_TUPLE 
in the node's kind field. 
Contains the definition of 
destination nodes 
(GEM$DESTINATION_NODE), 
identified by a value of 
GEMSNODE_K_DESTINATION 
in the node's kind field. 
The library file which should 
be used by front ends 
coded in BLISS. It contains 
the BLISS translation of 
the files listed above. 



TABLE 5 



Symbol Table and IL Routines 
Routine Purpose 



Initialization and Termination 

GEM$ST_INIT Initialize the intermediate 

representation for a module. 

GEMSST_FINI Release all space that has been 

allocated for the intermediate 
representation of a module. 
Creating and Manipulating ILGs 

GEMSIL_ALLOCATE_CIL^NODE Allocate a CIL tuple node. 

GEMSIL_ALLOCATE_DES_JVODE Allocate a destination node. 

GEMSIL_FREE_DES_NODE Deallocate a destination node. 

GEMS IL_INSERT Insert a tuple or a list of tuples 

into a list of tuples. 

GEMSIL_UNLINK Remove a tuple from a list of 

tuples. 

Creating the Symbol Table 

GEMSST_ALLOCATE_BLOCK NODE Allocate a block node. 

GEMSST_ ALLOC ATE_FRAME_NODE Allocate a storage frame node. 

GEMSST_ALLOCATE_MUTABLE_SYMBOL Allocate a Symbol node whose 

sublrind can be changed. 
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TABLE 5-continued 



Routine 



Symbol Tabic and IL Routines 
Purpose 



GEMSST_ALLOCATE_PARAMETER_NODE 
GEM$ST_ ALLOC ATE_SYMBOL NODE 



GEM$ST_LOOKUP_LITERAL 
GEMSST_LOOKUP_PSECT 
G EM$ST_MUTATE_S YMBOL 

GEMSST_STORE_ ADDRESS 

GEM$ST_STORE_BUFFER 

GEM$ST_STORE_LITERAL 



Allocate a parameter list node. 
Allocate a symbol node 1 whose 
subkind cannot be changed. 
Get a literal node for a specified 
literal value. 

Get a PSECT storage frame node 
with a specified name. 
Change a subkind of a mutable 
symbol node. 
Specifying Initial Values 



Specify a symbol or PSECT address 
as the initial value of a variable or 
PSECT location. 

Specify an arbitrary block of bytes 
as the initial value of a variable or 
PSECT location. 

Specify the value of a literal node 
as the initial value of a variable or 
PSECT location. 



TABLE 6 



Representational Types for Specific Target Architectures 



Type 


MIPS 


64-bit RISC 


VAX 




Supported Arithmetic Types 




INT8 


Yes 


Yes 


Yes 


INT16 


Yes 


Yes 


Yes 


INT32 


Yes 


Yes 


Yes 


INT64 • 


No 


Yes 


No 


UINT8 


Yes 


Yes 


Yes 


UINT16 


Yes 


Yes 


Yes 


UINT32 


Yes 


Yes 


Yes 


UINT64 


No 


Yes 


No 


REALF 


No 


Yes 


Yes 


: REALD 


No 


Yes 


Yes 


REALG 


No 


Yes 


Yes 


REAL 


No 


No 


Yes 


REALS 


Yes 


Yes 


No 


REALT 


Yes 


Yes 


No 


REALQ 


No 


Yes 


No 


RE ALE 


No 


Yes 


No 


CMPLXF 


No 


Yes 


Yes 


CMPLXD 


No 


Yes 


Yes 


CMPLXG 


No 


Yes 


Yes 


CMPLXS 


Yes 


Yes 


No 


CMPLXT 


Yes 


Yes 


No 






Type Sizes 




ADDR 


32 


64 


32 




Type Synonyms 




IADDR 


LNT32 


INT64 


INT32 


UADDR 


UINT32 


U1NT64 


UINT32 


IMAX 


INT32 


INT64 


INT32 


UMAX 


UWT32 


U1NT64 


UINT32 



TABLE 6a 



IV_IS_INDUCTIVE - 



a flag indicating that TUPLE is 
an inductive expression with 
respect to the loop designated 
by the loop top TUPLE(1V_LOOP]. 
At the end of the FTND_IV 
algorithm, this tuple is inductive 



25 



30 



TABLE 6a-continued 



iv_basic - 



35 



IV_LOOP - 



IV_NON_CONSTANT 
lV_COEFFICIENT . 



40 



45 



New Row Node Fields 



50 



55 



BASIC_IVS - 



CONDITION AL_SET - 



New Tuple Fields for Induction Variable Detection 



60 



65 



only if IV_BASIC is in 
the BASIC_IVS set of the 
loop designated by IV_LOOP. 
the basic induction variable candidate 
of TUPLE. If IV_BASIC is not 
in the basic induction variable set of 
IV__LOOP after the FIND_JV 
algorithm has completed, then 
this tuple is not inductive, 
the loop top of the innermost 
loop that TUPLE is 
inductive within. 

Each inductive expression E defines 
a linear function on a basic 
induction variable I. That is, 
E can be recast in terms of I by a 
function of the form: 
E=(a* l) + b 
where "a" is the "coefficient*' 
of the linear function, and "b" 
is the "offset" The 
IV_COEFFICIENT field is an 
integer field containing the constant 
part of the coefficient. The 
rV_NON_CONSTANT field 
is a flag indicating that the 
coefficient has non-constant parts. 



set of basic induction variable 
candidates for the loop represented 
by "this" loop top. Initially, 
this is the set of all variables 
modified in the loop. Algorithm 
FTND_IV eliminates the 
variables that don't conform to the 
rules for basic induction variables. 
Only valid for loop tops, 
set of variables with stores that 
do not get executed exactly once 
on each complete trip through the 
loop represented by u this" 
loop top. Presence in this set 
does NOT imply that the variable is 
an induction variable. Only valid for 
loop tops. 
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TABLE 7 



TABLE 8-continued 



Field 



Kind 

Generic operator 
Operator type 



Result type 



Operands 



Next tuple 



Locator 



Expr count 



Common Tuple Fields 



Meaning 



The generic node kind field that occurs in 
every node. 

The general operation performed by the tuple. 
This is just another name for the generic 
subkind field that occurs in every node. 
A data type which, in conjunction with the 
generic operator, determines the 
specific operation performed by the tuple. 
The operator type is usually, but not always, 
the same as the data type of one or more 
operands (particularly the first operand) of the 
tuple. Note that is is not necessarily the same 
as the data type of the value computed by the 
tuple. For example, ADD. INT 16 adds two 
INT 16 operands and produces an INT16 
result, but LSS.INT16 compares two 
INT 16 operands and produces a 
BOOL result, and STORE.INT16 stores an 
INT 16 value in a memory location and doesn't 
have a result. 

The type of the value computed by this tuple. 
For most operators the result type is 
determined by the opeartor type, but for 
some operators the result type is independent 
of the operator type, and the specific 
operation performed by the tuple depends 
on both types. 

An array of pointers to the operands of 
this tuple. The number of operands 
is determined by the generic 
operator. Each operand pointer 
points lo another IL tuple node or, 
in the CIL only, to a symbol or 
literal node. The individual 
operand pointer fields may be referred 
to as op 1, op2, etc. 

Pointers to the next and previous tuples 
in a doubly-linked list of tuples. The next 
tuple order is the implicit order of evaluation. 
In the CIL, all the tuples in the ILG 
are linked together, while in the EIL, 
the tuples in each basic 
block form a separate list. 
The textual location in the program source of 
the token or tokens which were compiled 
into this tuple. It is used ia constructing error 
messages, source correlation tables, etc. 
(Locators are described in the 
GEMSLO package specification.) 
Used only in ELL tuples, where is is 
set by the back end. The expr count field 
is discussed in CT.029, Interface for 
Representing Effects. 



TABLE 8 

Headings in Tuple Dictionary Entries 



Heading Description 



Headings in Tuple Dictionary Entries 



5 Heading Description 



Value 



Restrictions 



20 



25 



30 



35 



the format section, and lists all the attributes that 
are used in the tuple. The meanings of the attributes 
are generally summarized in the restrictions and 
description sections. 

The value section follows the attributes section. It 

provides a detailed description of the value returned 

by the tuple as a function of its operands. 

The restrictions section follows the value section. It 

describes restrictions on the use of the tuple. 

Restrictions generally fall into one of the following 

categories: 

(a) The tuple can be used only in the CIL or the 
EIL. 

(b) The tuple must occur in a particular context in * 
an ILG, or must be an operand of a particular 
kind of tuple, 

(c) Certain operands of the tuple must be tuples 
with specific operators. 

(d) Certain attribute fields of the tuple must contain 
pointers to particular kinds of nodes. 

Only structural (syntactic) restrictions on the form 
of the ILG are documented in this section. Runtime 
restrictions, such as the requirement that the length 
operand of a substring tuple must not be negative, 
are given in the description section. 
The description section follows the restrictions 
section, and describes the effects of the tuple, it also 
gives miscellaneous information about the tuple such 
as runtime requirements on its operand values, error 
conditions that can occur, and particular source 
language constructs that the tuple is provided to 
support. 



Description 



TABLE 9 



Data Access Operators 



Operator 



Meaning 



Fetch Operators 



40 



45 



50 



Operator The name of the operator appears at the top of the 
dictionary page. This name may be prefixed with 
GEMSTPL_K_to yield the actual constant 
used in GEM code. 

Overview The tuple overview appears directly below the 

operator name. It explains in one or two sentences 
what a tuple with this operator will do, 

Format The tuple format follows the tuple overview. It 

specifies the number of operands that the operator 
takes and the allowable operator types, operand 
types, and result types. 

Attributes Attributes are tuple fields other than the common 

fields listed in Table 7. The attributes section follows 



FETCH Fetches a representational value. 

FETCH A Fetches a signed integer with sign extension or 

an address or unsigned integer with zero exten- 
sion from a packed array clement 
FETCHF Fetches a character or bit string with a specified 

length. 

FETCHS Fetches a character or bit substring, that is, a 

string with a specified length and specified char- 
acter or bit offset from a base address. 
FETCH V Fetches a varying length character string, that 

is, one whose length is in the word preceding the 
text of the string. 
FETCHX Fetches a signed integer with sign extension or 

an address or unsigned integer with zero exten- 
sion from a bit field. 
FETCHZ Fetches a null-terminating character string. 

FETCHZA Fetches a signed integer with zero extension 

from a packed array element. 
55 FETCH ZX Fetches a signed integer with zero extension 

from a bit field. 

Store Operators 

STORE Stores a representational value. 

STORE A Stores an integer or address value in a packed 

array element. 
STOREF Stores a character or bit string. 

STORES Stores a character or bit substring, (hat is, stores 

a string with a specified length at a specified 
character or bit offset from a base address. 
STOREV Stores a varying length character string, that is, 

stores the text of the string following a word 
containing the length of the string. 
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TABLE 9-continued 



TABLE 10-continued 



Operator 



STOREX 
STOREZ 



V STOKE 
VSTOREA 

VSTOREX 



POSTINCR 

POSTINCRA 

POSTINCRX 



PRE [NCR 

PREINCRA 

PREINCRX 



ADDMOD 

ADDMODA 

ADDMODX 

DIVMOD 

DIVMODA 

DIVMODX 

IANDMOD 

IANDMODA 

1ANDMODX 

IORMOD 

IORMODA 

IORMODX 

IXORMOD 

IXORMODA 

DCORMODX 

MULMOD 

MULMODA 

MULMODX 

REMMOD 

REMMODA 

REMMODX 

SHLMOD 

SHRMODA 

SHRMODX 

SUBMOD 

SUBMODA 

SUBMODX 



Data Access Operators 
Meaning 



Stores an integer or address value in a bit field. 
Slores a null- terminated character string, that is, 
stores the text of the string followed by a null 
character (all zero bits). 

Stores an arithmetic or address value, and yields 

the value that was stored. 

Stores an integer or address value in a packed 

array element, and yields the value that was 

stored 

Stores an integer or address value in a bit field, 
and yields the value that was stored. 
Increment Operators 

Fetches a representational value from a vari- 
able, from a packed array element, or from a bit 
field, adds a compile-time constant increment to 
it, stores the result back into memory, and yields 
the initial (unincrcrnented) value. 
Fetches a representational value from a vari- 
able, from a packed array element, or from a 
bit field, adds a compile-time constant increment 
to it, stores the result back into memory, and 
yields the incremented value. 
Variable Modification Operators 

These operators fetch a value from a variable, 
a packed array element, or a bit field, perform 
an arithmetic operation between the fetched 
value and another operand value, stare the 
result of the arithmetic operation back into the 
original memory location, and yield the updated 
value. 

Adds some value to the arithmetic value in a 
memory location. 

Divides the arithmetic value in a memory loca- 
tion by some value. 

"And"s the integer value in a memory location 
with some value. 

"Or"* the integer value in a memory location 
with some value. 

"Exclusive or"s the integer value in a memory 
location with some value. 

Multiplies the arithmetic value in a memory 
location by some value. 

Takes the remainder of the arithmetic value in a 
memory location with respect to some value. 

Shifts the integer value in a memory location 
right by some value. 

Subtracts some value from the arithmetic value 
in a memory location. 



TABLE 10 



Attributes of Data Access Tuples 



Attribute Meaning 



Attributes of Data Access Tuples 



5 Attribute Meaning 



20 



25 



Sec CT.029 for more details. 

Effccts2 Not used in FETCH and STORE tuples. For a 

PREINCR, POSTINCR, or opMOD tuple, effects 
pertains to the "read effects" (dependencies) of the 
tuple while effects2 pertains to its "write effects." 

Base Base symbols are described in CT.070, Data Access 

symbol Model. 

Must Not used in STORE tuples. Indicates to the optimizer 
read that the variable being fetched may have been written, 
through some mechanism not otherwise detectable in 
the IL, subsequent to any prior fetches or stores, and 
that it therefore must not be assumed to have the same 
value that it had at the time of any prior fetch or store. 
IL expansion will automatically set the must read flag 
of a fetch whose base symbol has the has volatile 
writes attribute. 

Must Not used in FETCH tuples. Indicates to the optimizer 
write that the variable being written may be read, through 
some mechanism not otherwise detectable in the IL, 
prior to any subsequent fetches, and that this store 
must therefore be performed, even if no fetches are 
detectable prior to any subsequent stores. IL expansion 
will automatically set the must write flag of a store 
whose base symbol has the has volatile reads attribute. 



TABLE 11 



30 



Arithmetic Operators 



Operator 



Meaning 



Offset A constant offset (in bytes to be added to the address 
operand for the fetch or store operation. 

Effects A longword which is reserved for use by the front end. 
GEM will never examine this field (except when 
propagating it during IL expansion). It is intended as 
a place for the front end to save information about the 
memory locations affected or accessed by the tuple. 



Fetch Operators 

FETCH Fetches a representational value. 

35 FETCHA Fetches a signed integer with sign extension or 

an address or unsigned integer with zero exten- 

sion from a packed array element. 

FETCHX Fetches a signed integer with sign extension or 

an address or unsigned integer with zero exten- 
sion from a bit field. 
40 FETCHZA Fetches a signed integer with zero extension 

from a packed array element. 

FETCHZX Fetches a signed integer with zero extension 

from a bit field. 

Store Operators 

45 STORE Stores a representational value. 

STOREA Stores an integer or address value in a packed 

array element. 

STOREX Stores an integer or address value in a bit field. 

VSTORE Stores an arithmetic or address value, and yields 

the value that was stored. 
VSTOREA Stores an integer or address value in a packed 

array element, and yields the value that was 
stored 

VSTOREX Stores an integer or address value in a bit field, 

and yields the value that was stored. 
Arithmetic Computations 

^ ABS Computes the absolute value of its operand 

ADD Computes the sum of its operands. 

CADD Computes the sum of a complex and a real 

operand. 

CDIV Computes the quotient of a complex and a real 

operand. 

60 CEIL Computes the smallest integer value which is not 

less than the value of its real operand. 
CMUL Computes the product of a complex and a real 

operand. 

CONJG Computes the complex conjugate of its operand. 

CREVSUB Computes the difference of a complex and a real 

65 operand. 

CSUB Computes the difference of a complex and a real 
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TABLE 11 -continued 



TABLE 11 -continued 



Arithmetic Operators 



Arithmetic Operators 



Operator 



DIV 
FLOOR 

IPWR 

IPWRO 

IPWRZ 



MAX 
MIN 
MOD 

MUL 
NEG 

PMOD 



PWR 
PWRO 
PWRZ 
REM 

ROUND 

SUB 
TRUNC 

IAND 

IEQV 

INOT 

IOR 

DCOR 

ROT 
SHL 

SHR 

SH 



Meaning 



Computes the bitwise conjunction of two 
integers. 

Computes the bitwise equivalence of two 
integers. 

Computes the bitwise complement of an integer. 
Computes the bitwise disjunction of two integers. 
Computes the bitwise exclusive or of two 
integers. 

Rotates an integer value. 

Shifts an integer value left by a positive shift 

count. 

Shifts an integer value right by a positive shift 
count. 

Shifts an integer value left or right, depending 
on the sign of a shift count. 
Mathematical Computations 



ACOS 


Computes the arc cosine in radians of its 




operand. 


ACOSD 


Computes the arc cosine in degrees of its 




operand. 


ASIN 


Computes the arc sine in radians of its operand. 


ASIND 


Computes the arc sine in degrees of its operand. 


ATAN 


Computes the arc tangent in radians of its 




operand 


ATAND 


Computes the arc tangent in degrees of its 




operand. 


ATAN2 


Computes the arc tangent in radians of the ratio 




of its two operands. 


ATAND 


Computes the arc tangent in degrees of the ratio 




of its two operands. 


COS 


Computes the cosine of its operand, which is 



5 Operator 



operand. 

Computes the quotient of its two operands. 
Computes the largest integer value which is not 
greater than the value of its real operand. 
Computes its first operand raised to the power of 
its integer second operand, signalling an error if 
both operands are zero. 

Computes its first operand raised to the power of 
its integer second operand, yielding one if both 
operands are zero. 

Computes its first operand raised to the poweT of 
its integer second operand, yielding zero if both 
operands are zero. 

Computes the maximum of its operands. 
Computes the minimum of its operands. 
Computes the mathematical modulus of its 
operands (The Ada and PL/I MOD operators). 
Computes the product of its operands. 
Computes the negative or twos-complement of 
its operand. 

Computes the mathematical modulus of its 
operands, where the divisor must be positive 
(the Pascal MOD operator). 
Computes its first operand raised to the power of 
its second operand, signalling an error if both 
operands are zero. 

Computes its first operand raised to the power of 
its second operand, yielding one if both operands 
are zero. 

Computes its first operand raised to the power of 
its second operand, yielding zero if both 
operands are zero. 

Computes the remainder of its operands (the 
FORTRAN MOD function, BLISS MOD 
operator, C % operator, and Pascal and Ada 
REM operators). 

Rounds the fractional part of a real number to 
the nearest integer value. 
Computes the difference of its operands. 
Truncates the fractional part of a real number 
towards zero 

Shifting and Masking 



COSD 

COSH 
10 EXP 

LOG 
LOG2 
LOG 10 
SIN 

15 S1ND 

SINH 
SQRT 
TAN 

20 TAND 

TANH 
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30 



35 



CAST 

CMPLX 

CVT 

IMAG 
REAL 
ROUND 

TRUNC 

XCVT 



40 



EQL 
GEQ 

GTR 



LSS 
LEQ 

45 NEQ 
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ADD MOD 
ADDMODA 
ADDMODX 
DIVMOD 
DIVMODA 
DIVMODX 
IANDMOD 
IANDMODA 
IANDMODX 
IORMOD 
IORMODA 
IORMODX 
IXORMOD 
IXORMODA 
IXORMODX 
60 MULMOD 
MULMODA 
MULMODX 
REMMOD 
REMMODA 
REMMODX 
65 SHLMOD 
SHLMODA 



Meaning 



specified in radians. 

Computes the cosine of its operand, which is 
specified in degrees. 

Computes the hyperbolic cosine of its operand. 
Computes the exponential (e to the power) of its 
operand. 

Computes the base-e logarithm of its operand. 
Computes the base- 2 logarithm of its operand. 
Computes the base- 10 logarithm of its operand. 
Computes the sine of its operand, which is 
specified in radians. 

Computes the sine of its operand, which is 
specified in degrees. 

Computes the hyperbolic sine of its operand. 
Computes the squire root of its operand. 
Computes the tangent of its operand, which is 
specified in radians. 

Computes the tangent of its operand, which is 
specified in degrees. 

Computes the hyperbolic tangent of its operand. 
Conversions 



Yields the value of an arithmetic type which has 
the same bit pattern as some value of some other 
type- 
Constructs a complex number from two real 
operands. 

Translates a value of one arithmetic type into a 
value of another arithmetic type. 
Takes the imaginary part of a complex number. 
Takes the real part of an imaginary number. 
Converts a real number to an integer value by 
rounding the fractional pan. 
Converts a real number to an integer value by 
truncating the fractional part toward zero. 
Converts a value of one integer type to another 
integer type, discarding excess significant bits in 
the representation of the converted value. 
Comparisons 

Tests if one arithmetic value is equal to another. 
Tests if one arithmetic value is greater than or 
equal to another. 

Tests if one arithmetic value is greater than 
another. 

Tests if one arithmetic value is less than another. 
Tests if one arithmetic value is less than or equal 
to another. 

Tests if one arithmetic value is different from 
another. 

Variable Modification Operators 

Adds some value to the arithmetic value in a 
memory location. 

Divides the arithmetic value in a memory loca- 
tion by some value. 

"And"s the integer value in a memory location 
with some value. 

"Or"s the integer value in a memory location 
with some value. 

"Exclusive or"s the integer value in a memory 
location with some value. 

Multiplies the arithmetic value in a memory 
location by some value. 

Takes the remainder of the arithmetic value in a 
memory location with respect to some value. 

Shifts the integer value in a memory location left 
by some value. 
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SHLMODX 

SHRMOD 

SHRMODA 

SHRMODX 

SUBMOD 

SUBMODA 

SUBMODX 



POST1NCR 

POSTINCRA 

POSTINCRX 



PREINCR 

PREINCRA 

PREfNCRX 



Operator 
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TABLE 11-continued 



Arithmetic Operators 



Meaning 



Shifts the integer value in a memory location 
right by some value. 

Subtracts some value from the arithmetic value 
in a memory location. 

Increment Operators 

Fetches a representational value from a 
variable, from a packed array element, or from 
a bit field, adds a compile -time constant 
increment to it, stores the result back into 
memory, and yields the initial (urdncremented) 
value. 

Fetches a representational value from a vari- 
able, from a packed array element, or from a bit 
field, adds a compilc-rime constant increment to 
it, stores the result back into memory, and yields 
the incremented value. 



TABLE 12 
Character and Bit String Operators 
Meanings 



5 Operator 



Fetch Operators 

FETCHF Fetches a character or bit strip with a specified 

length. 

FETCHS Fetches a character or bit substring, that is, a 

string with a specified length and specified 
character or bit offset from a base address. 

FETCHV Fetches a varying length character string, that 

is, one whose length is in the work preceding 
the text of the string. 

FETCHZ Fetches a nuU-terminated character string. 

Store Operators 

STOREF Stores a character or bit string. 

STORES Stores a character or bit substring, that is, 

stores a string with a specified length at a 
specified character or bit offset from a base 
address. 

STOREV Stores a varying length character string, that 

is, stores the text if the string following a word 
containing the length of the string. 

STOREZ Stores a null-terminated character string, that 

is, stores the text of the string followed by a 
null character (all zero bits). 
String Manipulations 

CON CAT Computes a string consisting of all the elements 

of one string followed by all the elements of 
another string. 

FILL Creates a copy of a character string, padded to 

a specified length with copies of a specified 
character. 

REPLICATE Creates the string which is the concatenation 
of a specified number of copies of another 

string. 

SUBSTR Extracts a substring from a specified string 

with a specified starting position and length. 

TRANSLATE Creates a copy of one character string, using 
another character string as a translation table. 
Bit String Logical Operators 

BAND Computes the bitwise conjunction ("set inter- 

section") of two bit strings. 

BDIFF Computes the bitwise difference ("set 

subtraction") of two bit strings. 

BEQV Computes the bitwise equivalence of two bit 
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EQL 
GEQ 

GTR 
LEQ 

LSS 
NEQ 



45 



50 
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EQLP 
GEQP 

GTRP 

LEQP 

LSSP 
NEQP 



B RANGE 
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TABLE 12-continued 



Character and Bit String Operators 
Meanings 



strings, 

BNOT Computes the bitwise negation ("set 

complement") of a bit string. 
BOR Computes the bitwise disjunction ("set union") 

of two bit strings. 
BXOR Computes the bitwise exlusive or ("set 

difference") of two bit strings. 
Conversions 

ELEMENT Extracts a single element from a character or 

bit string and yields it as a CHAR or as an 
LMAX zero or one. 
SCAST Yields the string with the same bit pattern as 

some other value. 
USTR1NG Creates a string consisting of a single char- 

acter. 

Position and Size Functions 

INDEX Computes the location of the first occurrence 

of one character string within another. 
LENGTH Computes the length of a string. 

PINDEX Computes the location of the first occurrence 

of one string within another, but yields -1 if 
both strings are empty. 
PSEARCH Computes the location of the first character in 

one character soring that is also found in 
another character string, but yields -1 if both 
strings are empty. 
PVER1FY Computes the location of the first character in 

one character string that is not also found in 
another character string, but yields -1 if both 
strings arc empty. 
SEARCH Computes the location of the first character in 

one character string that is also found in 
another character string. 
VERIFY Computes the location of the first character in 

one character string that is not also found in 
another character string. 

Unpadded Comparisons 

Tests if one string is equal to another. 
Tests if one string is greater than or equal to 
another. 

Tests if one string is greater than another. 
Tests if one string is less than or equal to 
another. 

Tests if one string is less than another. 
Tests if one string is different from another. 
Padded Comparisons 

Tests if one padded string is equal to another. 
Tests if one padded string is greater than or 
equal to another. 

Tests if one padded string is greater than or 
equal to another. 

Tests if one padded string is less than or equal 
. to another. 

Tests if one padded string is less than another. 
Tests if one padded string is different from 
another. 

Set Constructors 

Creates a new bit string by setting a con- 
tiguous sequence of bits to one in an existing 
bit string. 

BS INGLE Creates a new bit string by setting a single bit to 

one- in an existing bit string. 
60 ZEROBITS Creates a bit string of a specified number of zero 

bits. 

Set Predicates 

MEMBER Tests whether a bit string has a one bit at a 

specified index. 

65 SUPERSET Tests whether every one bit in a bit string is also 
a one bit in another bit string. 
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TABLE 12-continued 




Character and Bit String Operators 


Operator 


Meanings 


SUBSET 


Tests whether every one bit in a bit string is also 




a one bit in another bit string. 


TABLE 13 




Boolean Operators 


Operator 


Meaning 



TABLE 13-continued 



10 



Predicates 

LBSET Tests whether the least significant bit of an 

integer value is set 
NONZERO Tests whether an integer value is nonzero. 

Representation 

ALLBITS Yields an integer— 1 (or its unsigned equivalent) 

for true or 0 for false. 
LSBIT Yields an integer 1 for true or 0 for false. 

Relations 

EQL Tests is one scalar or string value is equal to 

another. 

EQLBLK Tests if two blocks of bytes in memory are the 

same. 

EQLP Tests if one padded string is equal to another. 

GEQ Tests if one scalar or string value is grater than 

or equal to another. 
GEQP Tests if one padded string is greater than or 

equal to another. 

GTR Tests if one scalar or string value is greater than 

another. 

GTRP Tests if one padded string is greater than 

another. 

LEQ Tests if one scalar or string value is less than or 

equal to another. 

LEQP Tests if one padded string is less than or equal to 

another. 

LSS Tests if one scalar or string value is less than 

another. 

LSSP Tests if one padded string is less than another. 

MEMBER Tests whether a bit string has a one bit at a 

specified index. 

NEQ Tests if one scalar or string value is different 

from another. 

NEQBLK Tests if two blocks of bytes in memory are 

different from one another. 
NEQP Tests if one padded string is different from 

another. 

SUPERSET Tests whether every one bit in a bit string is also 

a one bit in another bit string. 
SUBSET Tests whether every one bit in a bit string is also 

a one bit in another bit string. 
Logical Functions 

LAND Computes the logical conjunction of two 

Boolean values. 
LANDC Computes the logical conjunction of two 

Boolean values, "short-circuiting" evaluation 

of the second operand if the first is false. 
LANDU Computes the logical conjunction of two 

Boolean values, guaranteeing that both operands 

will be evaluated. 
LEQV Computes the logical equivalence of two 

Boolean values. 

LNOT Computes the logical complement of a Boolean 

value. 

LOR Computes the logical disjunction of two Boolean 

values. 

LORC Computes the logical disjunction of two Boolean 

values, "short -circuiting" evaluation of the 
second operand if the first is true. 

LORU Computes the logical disjunction of two Boolean 



65 



Boolean Operators 



5 Operator 



Meaning 



LXOR 

SEL 

SELC 

SELU 



20 



25 



values, guaranteeing that both operands will be 
evaluated. 

Computes the logical exclusive or of two 
Boolean values. 

Conditional Expressions 

Selects one of two values, depending on a 
Boolean selector. 

Evaluates one of two expressions, depending on 
a Boolean selector. 

Selects one of two values, depending on a 
Boolean selector, but guarantees (hat both 
operands will be evaluated. 
Operand Delimiter 

Marks the beginning of the tuple sequence for an 
operand of a LAND, LOR, SEL, LANDC, 
LORC, or SELC tuple. 

Flow Control 

Signals an exception condition if a Boolean 
value is false. 

Branches to one of two destinations depending 
on a Boolean value. 



FLO WM ARK 



ASSERT 
BRCOND 



TABLE 14 



30 



Checking Operators 



Operator 



Meaning 



35 



40 



45 



50 



ASSERT Signals an exception if a Boolean value is false. 

CHKEQL Signals an exception if two values are not equal. 

CHKGEQ Signals an exception if one value is less than 

another. 

CHKGTR Signals an exception if one value is less than or 

equal to another. 

CHKLENEQL Signals an exception if the length of a string is 

not equal to a specified integer. 
CHKLENGTR Signals an exception if the length of a string is 

less than or equal to a specified integer. 
CHKLENLSS Signals an exception if the length of a string is 

greater than or equal to a specified integer. 
CHKLEQ Signals an exception if one value is greater than 

another. 

CKKLSS Signals an exception if one value is greater than 

or equal to another. 
CHKNEQ Signals an exception if one value is equal to 

another. 

CHKRANGE Signals an exception if one value does not fall in 
the inclusive range bounded by two other 
values. 

SIGNALS Unconditionally signals an exception. 



TABLE 15 
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Operator 



• Flow Control Operators 
Meanings 



BEGIN 
60 ENTRY 
LABEL 
VLABEL 
HANDLER 



BRANCH 



BRARITH 



Branch Targets 

Marks the beginning of the 1LG for a routine. 
Represents an entry point of a routine. 
Represents a branch target. 
Represents a virtual basic block. 
TBS. 

Branches 

Branches unconditionally to a specified 
destination. 

Branches to one of three destinations, depend- 
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TABLE 17 



Operator 



Flow Control Operators 
Meanings 



BRCOND 
BRSEL 

ENTRYPTR 

ESTLABEL 
EST ENTRY 
VBRANCH 

JUMP 

JUMFLOCAL 

JUMPSYMBOL 

RETURN 

STOP 



Transfers control through a "bound label 
variable," which may involve restoring the 
context of an outer routine. 
Transfers control to a sepcified address, which 
is assumed to be the address of a label in the 
current routine. 

Flow Termination 

Does a non-local goto to a specified label 
symbol in a routine that contains the current 
routine. 

Terminates the current routine and returns 
control to the return that called it, 
immediately following the call. 
Terminates the current routine and returns 
control to the return lhat called it. Also 
informs GEM that this routine will never be 
called again (i.e., that this return terminates 
program executioa 



TABLE 16 



Hag 



Meaning 



Settings of Parameter Semantic Flagj 
For Various Source Languages 



ing on whether an arithmetic value is 
neagative, zero, or positive. 
Branches to one of two destinations, depending 
on whether a Boolean value is true or fale. 
Chooses the destination whose low test and 
high test constants enclose the value of an 
integer selector. 

Relates a routine's BEGIN tuple to its 

ENTRY tuples. 

TBS. 

TBS. 

Relates a VLABEL to a set of actual possible 
destinations in a virtual basic block. 
Indirect Branches 



Language, Semantics 



Expose/Conceal 
Alias Effects 



Input/Output 



BLISS parameters Don't care Input 

C parameters Don't care Input 

10 Standard FORTRAN Don't care Input/Output 
parameters 

(Old) VAX FORTRAN Expose Input/Output 
parameters 

Pascal value parameters Conceal Input 

Pascal VAR parameters Expose Input/Output 

Ada atomic parameters Conceal see Note 

Ada aggregate parameters Don't care see Note 

PL/I parameters Expose Input/Output 

Note: 

As specified by the IN, OUT, or IN OUT modifiers in the parameter 
specification in the Ada routine declaration. 
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TABLE 18 



The GEMS MECHANISM Enumerated Type 



23 Constant Meaning 



30 



35 



Parameter Symbol Flags That Affect The Choice- 
Between Copy And Bind Semantics 



Must Requires that the parameter be implemented with bind 
bind semantics. If must bind is specified, then the other flags 

listed below are ignored. 
Conceal Indicates that alias effects must not occur. Basically, 
alias this requires that the parameter be implemented with 

effects copy semantics. 

Expose Indicates that alias effects must be visible. Basically, 
alias this requires that the parameter be implemented with 

effects bind semantics. 

If neither conceal alias effects nor expose alias effects is 
specified, then GEM need not worry about alias 
effects. (It will probably use copy semantics for scalar 
parameters and bind semantics for aggregate 
parameters,) It is an error for the front end to set both 
of these flags. 

Input Indicates that the calling routine may have initialized 
the actual storage location prior to the call If copy 
semantics are used for this routine, then the actual 
storage location must be copied to the local storage 
area at routine entry. 

Output If this flag is set, then the calling routine expects the 
actual storage location to contain the final value of the 
parameter upon return from the call. If it is not set, 
then the calling routine expects the actual storage 
location to be unaffected by the call. 
If the output flag is false, then the parameter must have 
copy semantics. If it is true and copy semantics are 
used, then the local storage location must be copied to 
the actual storage location before the routine returns. 
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Value The caller passes the value of the argument. The 

actual storage location is the entry in the parameter 
list 

Reference The caller passes the address Of some storage 

location. The actual storage location is the storage 
location whose address was passed in the parameter 
list. 

Reference parameters have a length parameter field, 
which may be defined to point to another parameter 
symbol in the same routine. This other parameter, 
which must have data type IMAX and the value 
mechanism, is assumed to receive the actual length of 
the reference parameter, whose unknown size flag 
will presumably be set (This combination of a stor- 
age location passed by reference and an associated 
length passed by value is sometimes referred to as an 
"address and length" mechanism.) 
The caller passes the address of a data structure con- 
taining the address and length of a character or bit 
string (the maximum length, for a varying character 
string). The storage location associated with the 
parameter symbol is the contents of the base address 
field in the descriptor data structure. 
Array The caller passes the address of a data structure 

describing a character or bit string as a one- 
dimensional array or bit array. The storage location 
associated with the parameter symbol is the contents 
of the base address field in the descriptor data 
structure. 

General The caller passes the address of a data structure con- 
taining the address of some storage location. The 
storage location associated with the parameter 
symbol is the contents of the base address field in 
the descriptor data structure. 
The front end is responsible for generating code in 
the caller to fill in all fields of the descriptor data 
structure other than its base address field, and for 
generating code in the called routine to interpret 
those fields. The called routine gets the address of 
the descriptor using the DESCADDR tuple. 
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TABLE 19 



Dynamic String Return Mechanisms 
Mechanism Description 



65 Fixed 
Buffer 



The caller allocates a fixed size buffer and passes a 
descriptor for it The called routine copies as much 
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TABLE 19-conlinued 



TABLE 21 



Dynamic String Return Mechanisms 
Mechanism Description 



of the aggregate as will fit into the buffer, and then 
retains the original length of the aggregate. The 
caller can compare the original length to the buffer 
length to determine whether the return value has 
been truncated. (This is equivalent to the fixed-size 
mechanism described above, with an extra return 
value for the length.) 
Stack The caller passes the address of a descriptor. The 

called routine leaves the aggregate on the stack 
(beyond the call frame of its caller), leaves the stack 
pointer pointing past the aggregate, and fills in the 
descriptor to specify the address and length of the 
aggregate. 

Dynamic The caller passes a descriptor for a heap-allocated 
string string (a dynamic string descriptor). The called 

routine either overwrites the string pointed to by the 
descriptor or deallocates that string, allocates 
another one, and updates the descriptor. 



TABLE 20 



Attributes of Argument Tuples 



Attribute Meaning 



Operator 



Routine Call, Argument Passing, and 
Value Return Operators 

Meaning 



20 



INITCALL 

ARGVAL 
AROVALA 

ARGADR 
ARGADRA 

ARGADRS 



25 ARGTMP 



ARGTMPA 



Pass by Indicates whether the argument is to be passed in 
register a particular register or in the location determined 
by the system calling standard for the particular 
architecture. If it is true, the argument should be 
passed in the register whose identifier (from the 
GENSTS_REG enumerated type) is in the arg 
location field. If it is false, then arg location is simply 
a 1- on gin index among all the non-register arguments 
of this call, and GEM will determine the appropriate 
"standard" argument location. (GEM may override 
the argument location specified by arg location and 
pass by register if it has both the calling and called 
routines available to it, so that it can do the 
necessary analysis.) 
Special May be true only if pass by register is also true, in 
register which case it indicates that GEM must use the 

specified register. 
Arg Relevant only if mechanism is reference, in which 

locau'on2 case these fields specify the argument location where 
Pass by the argument's length should be passed by value. The 
register2 length will not be passed in arg location2 is 0. 
Parm is A flag which, if true, indicates that GEM should 
read assume that the called routine might examine the 

contents of the actual argument location which is 
passed to it. (This is meaningful only if mechanism is 
not value.) 

Parm is A flag which, if true, indicates that GEM should 
written assume that the called routine might modify the 
contents of the actual argument location which is 
passed to il. (This is meaningful only if mechanism is 
not value.) 

Desc size Meaningful only if mechanism is general, in which 

case it is the size of the descriptor that will be 

allocated to pass the argument 
Offset Used only in the various ARGADR tuples, where it 

specifies the offset of the actual argument address 

from the tuple's address operand. 
Effects Used only in the various ARGADR tuples, where it 

characterizes the "read" side effects resulting from 

passing the argument. 
Effects2 Used only in the various ARGADR tuples, where it 

characterizes the "write" side effects resulting from 

passing the argument. 
Base Used only in the various ARGADR tuples, where it 

Symbol is a pointer to the symbol node for the variable 

whose address is being passed, if one is known. 
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ARGBUF 



ARGDYN 
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ARGSTK 
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Call Initialization 

Marks the beginning of the IL for a routine 
call, and causes allocation of its argument list. 
Passing a Value 

Passes a representational value as an 
argument 

Passes a character or bit string value with a 
specified length 

Passing an Address 

Passes the address of a storage location 
containing a representational value. 
Passes the address of a storage location 
containing a character or bit string of a 
specified length. 

Passes a substring of the bit or character 
string in the storage location at a specified 
address. 

Allocating and Passing a Temporary 

Allocates space for a scalar value and passes 
its address. 

Allocates space for a character or bit string of 
a specified size and passes its address. 
Creating a Dynamic Return Value Descriptor 

Allocates space for a bit or character 
string of a specified size and passes a 
descriptor requiring that a value be returned 
in it with the fixed buffer dynamic return 
mechanism. 

Passes a descriptor requiring that a character 

or bit string be returned with the stack 

dynamic return mechanism. 

Passes a dynamic string descriptor requiring 

that a bit or character string be returned with 

the dynamic string or stack dynamic return 

mechanism. 

Passing Arguments in a Block 



ARGBLOCK 
BLKFIELD 
ARG DEFINES 

DSCFEELD 
CALL 

RESULTBUF 

RESULT DYN 

60 RESULT REG 
RESULTSTK 
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RESULTTMP 



65 



Allocates space for a block of a specified size 

and passes its address. 

Stores a scalar value into a field of a 

previously allocated argument block. 

Describes the side effects which are 

attributable to passing an argument through 

an argument block. 

Filling In a General Descriptor 

Stores an address or integer value into a field 
of a previously allocated general descriptor. 
Calling a Routine 

Calls the routine at a specified address. 
Retrieving a Return Value 

Retrieves a character or bit string value which 
has been returned in the temporary which was 
allocated with an ARGBUF tuple, and whose 
length has been returned in a specified 
register. 

Yields a dynamic string descriptor for the 
character or bit string which has been 
returned in response to an ARGDYN tuple. 
Retrieves a scalar result value from a 
specified register. 

Retrieves a character or bit string value which 
has been returned on the stack in response to 
an ARGSTK tuple. 

Retrieves a result value from a temporary 
which was allocated with an ARGTMP or 
ARGTMPA tuple. 
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Opcraior 



Routine Call, Argument Passing, and 
Value Return Operators 

Meaning 



RETURNDYN 



RETURN REG 
RETURNSTK 



Returning a Value From a Routine 

Returns a character or bit string value by 
the whatever dynamic return mechanism was 
specified in the descriptor passed by the caller. 
Returns a scalar value in a specified register. 
Returns a character or bit string value by the 
fixed buffer dynamic return mechanism if the 
caller passed a fixed buffer descriptor, or by 
the stack dynamic return mechanism if the 
caller passed a stack or dynamic string 
descriptor. 

Miscellaneous Parameter Access 

Yields the address of the descriptor that was 
allocated to pass a general mechanism 
parameter. 

Yields the actual size of an unknown size 
parameter. 



DESCADDR 



SIZE 



APPENDIX 
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Interpreter Control Actions 

The following actions control the execution flow of the 
actions interpreter, 

ACnONS(<result-var-Hst>; <temporary-vat-list) marks the 
beginning of the action sequence of a template. This must 
be the first action in the template since it allocates the 
operand variables. The contents of both vat-lists is a 
comma separated sequence of identifers used to name the 35 
operand variables during rest of the template. Either of 
these vat-lists may be empty if the template does not use 
either result operands or temporary operands. 
The identifiers in the result-vat-list are the names of the 
result operands. ILG nodes in void context have 0 result 40 
operands while most other expressions have 1 result 
operand. Exceptions include string results which 
require two or three operands (one to address the string 
body, one for the string length and one to hold the string 
body) and complex results which require two operands 45 
(one for the real component and another for the imagi- 
nary component). 
DELAY marks the end of the undelayed actions and the 
beginning of the delayed actions. When the DELAY 
action is interpreted, processing of the current template is 50 
suspended until the corresponding ILG subtree is used as 
a leaf of a parent subtree. When the template of the parent 
subtree undelays the corresponding leaf, interpretation 
will continue with the actions following the DELAY 
action. 

EXIT terminates interpretation of the action sequence. Inter- 
preting an EXIT action causes the result operands to be 
returned, causes the remaining operand variables and 
local TNs to be released, and causes interpretation to 
resume with the template that UNDELAYed this action 
sequence. 

END_ACTIONS marks the end of an action sequence. This 
is not truly an action since it is not interpreted. The 
END_ACTIONS operation must be the lexically last 
component of the action sequence. The operation marks 65 
the end of the scope of the operand identifiers declared in 
the ACTTONS operation. 
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UNDELAY(leaf,oprl,opr2, . . . ) causes the delayed context 
actions of the specified pattern "leaf' to be processed. The 
result operands of the leaf are copied into operand vari- 
ables "oprl", "opt2", etc. The number of copied operands 
must match the number of result operands in the template 
of the leaf. 

LABEL(name) causes "name" to label the current . position 

in the action sequence. 
GOTO(name) causes the interpreter to branch and continue 

processing at the action following the label specified by 

"name". 

TN Allocation and Lifetime Actions 

INCREMENT_LON() increments the Linear Order Num- 
ber clock variable that is used to determine the lifetimes 
of TNs. 

USE(operand) causes the specified operand variable to be 
referenced. This action is used to mark the last place in a 
template where an operand is used and causes lifetimes to 
be extended appropriately. 

ALLOCATE_PERMANENT(operand, size) causes a per- 
manent class TN of "size" bytes to be created and 
referenced by the specified "operand" variable. If the 
"size" parameter is missing then the size of the TN is 
determined by the result data type of the current template. 
This action only creates a TN during the CONTEXT pass. 
See the SAVE_TN action for a description of how this 
TN is accessed during the TNBIND and CODE passes. 

ALLOCATE_DELAYED(operand, size) causes a delayed 
class TN of "size" bytes to be created and referenced by 
the specified "operand" variable. If the "size" parameter 
is missing then the size of the TN is determined by the 
result data type of the current template. This action creates 
aTN during each of the CONTEXT, TNBIND and CODE 
passes. This action may not be performed while interpret- 
ing the undelayed actions. The lifetime of this TN termi- 
nates when the result using this TN is used. 

ALLOCATE_LOCAL(operand, size) causes a local class 
TN of "size" bytes to be created and referenced by the 
specified "operand" variable. If the "size" parameter is 
missing then the size of the TN is determined by the result 
data type of the current template. This action creates a TN 
during each of the CONTEXT, TNBIND and CODE 
passes. The lifetime of this TN must terminate in the same 
template as its creation. 

FORCE_REGISTER(operand) causes the TN specified in 
the "operand" variable to be marked as must not be in 
memory. This usually means allocation to a register unless 
no register is available in which case the TN is not 
allocated. 

FORCE_MEMORY(operand) causes the TN specified in 
the "operand" variable to be marked as must not be in a 
register. This usually guarantees allocation to a stack 
location. 

MUST_ALLOCATE(operand) causes the TN specified in 
the "operand" variable to be marked as must be allocated. 
Note: It is an error to do all three of FORCEJREGISTER, 
FORCE_MEMORY and MUST_ALLOCATE on the same 
TN as these three conditions are contradictory and cannot be 
all fulfilled. 

PREFERENCE(operandl,operand2) if "operandi" is allo- 
cated to a register then "operandi" is allocated to the same 
register; otherwise, "operandi is allocated independently 
of "operandi". Forcing "operand2" to the same register as 
"operandi" occurs even if "operandi" and "operand2" 
have conflicting lifetimes. (See the MOVE_VALUE 
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action for * 'advisory" preferencing as opposed to the 
"manditory" preferencing of the PREFERENCE action). 

INCREMENT_COST(number,operand) inceases the cost 
of nonallocation of theTN specified by "operand" by the 
amount "number". 

RESERVE_RO(number) cause "number" of consecutive 
registers to be reserved starting with register 0. 

TEST„MEMORY(operand,label) tests the TN referenced 
by the specified "operand" variable. If the TN is in 
memory then the action interprefer branches to the speci- 
fied "laber During the CONTEXT and TNBIND passes 
this action assumes that unallocated TNs are not in 
memory unless they have had a FORCE_MEMORY 
done on them. 

TEST_REGISTER(operand,label) tests the TN referenced 
by the specified "operand" variable. If the TN is in a 
register then the action interpreter branches to the speci- 
fied "label" During the CONTEXT and TNBIND passes 
this action assumes that unallocated TNs are in registers 
unless a FORCE_MEMORY has been done on the TN. 

ILG Load and Save Actions 

LOAD_LITERAL(node,operand) loads the literal value of 
the specified "node" matched by the template pattern into 
the specified "operand" variable. It is an error if "node" is 
not a LITREH 

SAVE_TN(operand,node,field) saves a reference to the 
permanent class TN specified by the "operand" variable. 
During the CONTEXT pass the TN pointer is saved in 
component "field" of the ILG tuple matched by the 
specified "node" of the template. During the TNBIND and 
CODE passes this information is fetched from the speci- 
fied "field" of the specified "node". Every permanent 
class TN must be saved during the CONTEXT pass in an 
appropriate ILG field so that the same TN can be located 
during the TNBIND and CODE passes. Delayed class and 
local class TNs are recreated each pass so they must never 
be saved. 

SAVE„OPERAND(operand,node,field_reg,field_base) 
saves the location of the specified "operand" variable. The 
information is saved in the ILG tuple matched by the 
specified "node" of the template. A register value is saved 
in component "field_reg". Certain register values encode 
that no allocation ocurred or that the operand is allocated 
on the stack instead of a register. If an operand is allocated 
to the stack, the stack offset is saved in the component of 
"node" specified by "field_base" 

SAVE_REGISTER(operand,node,field) saves the register 
number of the specified "operand" in the specified "field" 
of the specified "node" matched by the template pattern. 
This set of register numbers includes an encoding that no 
register was allocated. An error occurs if the specified 
operand is allocated to a memory location. 

Code Emitting Actions 

MOVE__VALUE(opr_src,opr_dst) generates the code to 
move a value from the "opr_src" operand to the "opr_ 
dst" operand. No code is generated if opr_src and opr_ 55 
dst are identical and this action is a hint to the allocator to 
make them identical. 

EMIT(opcode,operandl, operandi, . . . ) outputs an object 
instruction consisting of the specified "opcode" and using 
the specified operand variables as address modes of the 60 
instruction. 

MAKE_ADDRESS_MODE(opr_offset,opr_base,opr_ 
index, opr_result) makes a new operand in variable "opr_ 
result". This is a VAX specific action that uses "opr_ 
offset" as the offset, "opr_base" as the base register, and 65 
"opr_index" as the index register in order to create a 
VAX address mode. If "opr_offset" is missing then zero 
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is assumed. If "opr_offset" specifies a memory location 
then "opr_base" must be missing. If "opr_base" speci- 
fies a memory location then "opr_offset" must specify 
zero and "opr_index" must be missing. 
LOAD_CONSTANT(number,operand) makes a new 
address mode in "operand" representing the specified 
literal "number". Note that "number" is the literal value 
not a node matched by the pattern. Instead use LOAD_ 
LITERAL to create an address mode that contains the 
value of a LITREF ILG node. 

EXAMPLES 

There are several examples here including very simple 
addition templates and very complicated addressing tem- 
plates. These should give examples of both easy and difficult 
to write templates. 

The result value mode of a template and the set of value 
modes of pattern match leaves use a data type characteristic 
of the target architecture. These value modes are an enu- 
meration of the different ways a value may be encoded. This 
enumeration names the various ways expression values may 
be encoded in the virtual machine. 
Examples for the VAX: 

RV (Register Value). 

MV (Memory Value without indirection and without 
indexing). 

MVIND (Memory Value with indirection but without 
indexing). 

MV1 (Memory Value with byte context). 
MV2 (Memory Value with word context). 
MV4 (Memory Value with long context). 
MV8 (Memory Value with quad context), 
MV16 (Memory Value with octa context). 
AM (Address Mode without indirection and without 
indexing). 

AMIND (Address Mode with indirection but without 
indexing). 

AMINX1 (Address mode with byte indexing). 
AM1NX2 (Address mode with word indexing). 
AMINX4 (Address mode with long indexing). 
AMINX8 (Address mode with quad indexing). 
AM1NX16 (Address mode with octa indexing). 
PCFLOW (Flow bool represented by jump to false label 
or true label). 

STRINGV (String value encoded as a length and a 

memory address). 
VARYV (Varying string value encoded as address of 
length word). 

VOID (There is no value— used on an operation with only 
side-effects). 



Simple ADDL3 on a VAX 



Result value mode: RV 
Pattern tree: 

0: ADD,INT32 1,2 
1 : LEAF {RV ( MV,MV1ND,MV4} 
2: LEAF {RV,MV,MVIND t MV4> 
Pattern tests: 

none 
Cost: 2 
Actions: 

Actions(result; leafl, lcaf2); 



01/14/2004, EAST Version: 1.4.1 



5,613,117 



75 

-continued 



76 

-continued 



! "result" is the rcsuli temporary 

! "leafl" is LEAF 1: (the left operand) 

! "Icaf2" is LEAF 2: (the right operand) 

Undelay(Ueafl); 

Undelay(2,leaf2); 

Use(tcafl); 

Use(lcaf2); 

Increment_LON; 

AIlocate_Pcrmanent(resuU); 

Save_TN(resull,0,ILG_TN); 

Emit( ADDL3,leaf 1 ,leaf2^sult); 

Delay; 

Exit; 

End_Actions; 



Note: the heuristics used in the register allocator guarantee 
a high probability that the result operand will be allocated 
identically to one of operand 1 or operand 2. Such an 
allocation will result in an ADDL2 instruction instead of 
ADDL3. 



Simple SUBL3 on a VAX 



Result value mode: RV 
Pattern tree: 



SUBJNT32 1,2 

LEAF {RV,MV,MVIND,MV4} 

LEAF {RV ( MV,MVIND,MV4} 



Patters tests: 

none 
Cost: 2 
Actions: 

Actions(result; leafl, leaf2); 

! "result" is the result temporary 

! "leafl " is LEAJFl: (the left operand) 

! "Icaf2" is LEAF2: (the right operand) 

UndclayO.lcafl); 

Undelay(2,leaf2); 

Use(leaf2); 

Increment_LON; 

Use(leafl); 

AUocate_Permanent(iesuU); 
Save_TN(result,0,ILG_TN); 
• Erait(SUBL3,Ican,leafl .result); 
Delay; 
Exit; 

End_Actions; 
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Actions: 

Action (result; index_reg, base_reg, leaf4, Ieaf3, lit); 

! "result" is result address mode lit(base_reg)lindex_reg| 

! "index_reg" is the index scratch register 

! M base__rcg" is the base scratch register 

! "Ieaf4" is LEAF 4: (index leaf) 

! "leafy ' is LEAF 3: (base leaf) 

! "lit" is LITREF 1: 

Delay; 

! Force LEAF 4: into a register 
j 

Undelay(4,lcaf4); 
Allocate_Dclayed(index_reg); 
Force_Regi ster(index_reg); 
Must_Allocaie(index_reg); 
Preference(leaf4,index__ reg) ; 
Save_Register(index_reg,0 1 ILG_Index_Reg); 
Move_Valuefjeaf4,index_reg); 
Use(leaf4); 

! Force LEAF 3: into a register 
i 

Undelay(3,leaf3); 
AUocate_Delayed(base_reg); 
Force_Register(base_reg); 
Mu st_ Alio cale(base_reg) ; 
Prefercnce(leaf3 ,base__reg) ; 
Save_Regisier(base_reg,0,ILG_Base_Rcg); 
Move_ Value0caf3 ,basc_rcg) ; 
UscOcaO); 

! Generate address mode "Ut(leaf3)[leaf4]" 

t 

Load_Literal(l,lit); 

Make_Address_Mode(lit,base_reg,index_rcg^esult); 
Increment_LON; 
EXIT; 

End_Actions; 
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Note that the 7 actions forcing a LEAF into a register will 
probably be a common operation on a VAX. As a result there 
will be a "macro" action that has the effect of combining 
these 7 actions. 

Using MOVA for Addition on PRISM Revision 0.0 



40 



Note: Incrementing the LON after using operand 2 but 
before using operand 1 increases the probability that the 
heuristics of the register allocator will give operand 1 and 
the result operand the same allocation which will lead to a 
SUBL2 instruction instead of SUBL3. 

Byte Indexed Address Mode on a VAX 

This template generates the k(base_reg)[index_reg] 
address mode to do addition. The template follows the VAX 
FORTRAN conventions in that choosing this template guar- 35 
antees that registers will be used to hold the two operands. 



45 



50 



Result value mode: AMINX1 
Pattern irec: 



1,2 



3.4 



ADD.INT32 
LITREF, INT32 
2: ADD.LNT32 
3: LEAF {RV} 
LEAF {RV} 
Pattern tests: 

NO_OVERFLOW(0); 
NO_OVERFLOW(2); 
Cost: 1 
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Result value mode: RV 
Pattern tree: 

0: ADD.INT64 1,2 
1: UTREF.INT64 
2: LEAF {RV} 
Pattern tests: 

Iit_14_Bit(l); ! Succeeds if the b'teral fits in 14 bits 
Cost: 1 
Actions: 

Acnons(result; leaf2, reg2 t reg_result, lit); 

! "result" is result temporary 

! "Ieaf2" describes Leaf 2: 

! u reg2" is a scratch register for holding Leaf 2: 

! **rcg_jxsult" is a scratch register for computing result 

! "lit" is Literal 1: 

Undclay(2,leaf2); 

Allocate_Local(reg2); 

Force_Register(reg2); 

Must_AUocate(reg2); 

Save_Regisier(reg2,0,ILG_reg_0); 

Move_Value(leaf2,reg2); 

Use(leaf2); 

Use(reg2); 

AUocate_Local(reg_result) ; 

Force__Register(reg_result); 

Must_ All ocate(re&_iesult) ; 

Save_Register(reg_re5ult,0 t ILG_rcg_temp); 

Use(reg_result); 

IncremenL^LON; 

AHocate_Local(rcsult) ; 

Save_TN(result,0,ILG_TN); 

Load_literal(l,lit); 

Emit(MOVA_Move_Format4it t rcg2,reg_result); 
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Movc_ Value(reg_rcsult,result) ; 

Delay; 

Exit; 

End_Actions; 



Note: the heurestics of the register allocator guarantee that 
leaf2 and reg2 have a high probability of getting the same 
register. Also, result and reg_result will most likely get the 
same register. 



Long Context Indexing on VAX 

This template generates the k(leaf3)[leaf6] address mode 
to do multiplication by 4 followed by addition. The template 
follows the VAX PASCAL conventions in that choosing this 
template does not guarantee that registers will be avilable to 
hold the two operands. If registers are not available then the 
address mode is simulated using memory temporaries. 



Result value mode: AMINX4 
Pattern tree: 

0: ADD.INT32 1,2 

1: LTTREF,INT32 

2: ADD t INT32 3,4 

3: LEAF {RV} 

4 MUL.INT32 5,6 

5: UT,INT32 

6 LEAF {RV} 

Pattern tests: 

NO„OVERFLOAV(0); 

NO_OVERFLOW(2); 

NO_OVERFLOW(4); 

LITERAL_4(5); ! Succeeds if literal value is 4 
Cost: 1 
Actions: 

Actions(rcsult; index_reg, base_reg, Ieaf6, leaO, lit, temp); 

! "result" is the result address mode 

! "index„reg" is the index scratch register 

! "base_reg" is the base scratch register 

! "Leaf6" is LEAF 6: (index leaf) 

! "LeaD" is LEAF 3: (base leaf) 

! "lit" is LITREF 1: 

! "temp" is literal #2 (No_Jndex case) 

! or is (leaf3)(index_reg) 

' (Index_Has_.Reg_.Temp case) 

Delay; 

Load_Literal(l,lit); 
Undetay(6,leaf6); 
Undelay(3,leaf3); 
Allocate_Delayed(index_reg); 
lncrement_Cost(3,index_reg); 
Preference(lcaf6 ,indcx_rcg); 
Alio catc_Delayed(base„reg) ; 
Preference(lea/3,base_reg); 
lncremen _LON; 

Test_Memory(index_reg,No_lndcx); 
Movc_ Value (leaf 6,index_reg); 

! Make sure Index in register 
Test_Memory(base_reg,No_Base) ; 
Mo ve_Value(leaf3 ,b ase_reg) ; 

! Make sure Base in register 
M ake_ A ddress_Mode (lit,base__reg, 
iridex„reg,result); ! (Ht5 (base2)[indexl j 
Exit; 

Label(No_Index); 

! No register index temp 
Load_Constant(2,temp); 
Emit(ASHL,temp,leaf6,index_reg); 

! ASHL #2,leaf6,indcx_mem 
Emit(ADDL2,lcaf3,index_reg); 

! ADDL2 lcaf3,indcx_mcm 
Emit(ADDL2,lit,index_reg); 

! ADDL2 #UUndex_mem 
Make_Adtoss_Mode(,index_reg lf result); 

! @index_mem 



Exit; 

Label(No_Basc); 

! No register base temp 
5 Test_Memory(leaf3,Index_Has_Reg_Temp); 

! Index is not in temp 
Emit( ADDL3 ,lit,leaf3 ,base_reg); 

! ADDL2 #Ht4eaf3,base_,mem 
Make_Address_Mode(,base_reg,index_reg .result); 

! @base_mem|index_reg] 

l0 Exit; 

Label(Index_Has_Reg_Temp); 

! No base reg but index in temp 
Makc_Addrcss_Mode(,leaf3,index_reg,ternp); 
Emit(MOVAL,temp,indcx_reg); 

! MOVAL @lcaf3[indcx_rcg],index_rcg 
Emil(ADDL2,lit,index_reg); 
15 ! ADDL2 #lil,indcx_reg 

Make_Address_Mode(,index_reg, l resulO; 

! (index_reg) 

Exit; 

End_Actions; 



APPENDIX 

Definition of Basic TVpes 

25 The following routines define basic types that correspond 
to the representational types defined by the GEM IL. GEM_ 
TD_DEF_BASIC_TYPE defines the types nil, address, 
signed and unsigned integer, float and complex. GEM_ 
TD_DEF_CHAR_TYPE allows the definition of charac- 

30 ters defined over a number of base types. 

Note that boolean is not considered a basic type. It is 
suggested that compilers for languages such as Pascal define 
boolean as an enumeration containing the elements true and 
false. 

35 

TYPE_NODE = 

GEM_TD_DEF_J3 AS IC_T YPE( 

DECL_BLK : in_out GEM_BLOCK — NODE, 

LOCATOR : value, 

40 TYPE_NAME ; in VS„STR, 

BASIC_TYPE : value) 



Defines a basic type such as integer or real. DECL_BLK 
is the block node in which the type is defined. LOCA- 

45 TOR is a GEM or foreign locator. LOCATOR may be 
the null locator. TYPE_NAME is a varying string 
describing the type and may be null. BASIC_TYPE is 
the type being defined and must be an element of the 
GEM_TYP enumeration. Specifically excluded are the 

50 BOOL, BITS, STR8, and STR16 GEM_TYP ele- 
ments. 



TYPE_NODE = 

GEM_TD_DEF_CHAR_TYPE( 
55 DECL_BLK : in__out GEM_BLOCK_NODE, 

LOCATOR : value, 

TYPE_NAME : in VS_STR, 

BASIC_TYPE : value) 



60 Defines a character as a basic type. For example, a 
character may be UINT8, INT8, UINT16, UINT32, etc. 
DECL_BLK is the block node in which the type is 
defined. LOCATOR is a GEM or foreign locator. 
LOCATOR may be the null locator. TYPE_NAME is 

65 a varying string describing the type and may be null. 
BASIC_TYPE is the type being defined and deter- 
mines the size and representation of the character set. 
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TYPE_NODE = 

GEM_TD_DEF_STR1NG< 
DECL_BLK 
LOCATOR 
TYPE_NAME 
STRJNG_TYPE 
CHAR_TYPE 
STRING_LB ' 
STRING_UB 



in_out GEM_BLOCK_NODE, 
value, 

in VS_STR, 

value, 

value, 

in GEM_NODE, 
in GEM_NODE) 



TYPE_NODE = 

GEM_TD_DEF_B1TSTRING( 



DECL_BLK 
LOCATOR 
TYPE_NAME 
Bn*STRING_LB 
B rrSTRING_UB 



in_out GEM_ BLOCK _NODE, 
value, 

in VS_STR, 

in GEM_LITERAL_NODE, 
in GEM __LITERAL_NODE) 



Definition of Typedefs and Pointers 



80 



It must be an element of the GEM_TYP enumeration 
and is restricted to the signed and unsigned integers of 
size 8, 16, and 32 bits. 

Definition of Character and String Aggregates 

GEM_TD_DEF_STRING and GEM_TD_DEF_B1T- 
STRING define character and bit aggregates of a given base 
type. 



TYPE_NODE = 

GEM_TD_JJEF_TYPEDEF( 
DECL_BLK 
LOCATOR 
TYPE_NAME 
DEF_TYT J E 



in_out GEM_BLOCK_NODE, 
value, 

in VS_STR, 
value) 



Define a new type name and associate it with the type 
io represented by the type node DEF__TYPE. DECL_ 
BLK is the block node in which the type is defined. 
LOCATOR is a GEM or foreign locator. LOCATOR 
may be the null locator. TYPE_NAME is a varying 
string describing the type and may be null. DEF_ 
15 TYPE is a type node created for an existing type 
definition. 



Defines a character string of STRING_TYPE. The ele- 20 
ments of the string are characters of the type defined by 
CHAR_TYPE and the string has a lower and upper 
strands STRINGJLB and STRING_UB. The string 
size (number of elements) is STRING_UB- 
STRING_LB+1. A character string of unknown size is 25 
indicated by a STRING_UB value less than the 
STRING_LB value. 

DECL_BLK is the block node in which the type is 
defined. LOCATOR is a GEM or foreign locator. 
LOCATOR may be the null locator. TYPE_NAME is 30 
a varying string describing the type and may be null. 
STRING_TYPE is the string representation and is 
defined as being a member of the enumeration GEM_ 
STRING„REPR. CHAR_TYPE is a handle to the 
type node created for the string's character type 35 
returned by a call to GEM_TD_DEF_CHAR„ 
TYPE. null. STRING_UB and STRING_LB are the 
upper and lower bounds of the string. 



TYPE_NODE = 

GEM_TD_DEF_POINTER( 

DECL_BLK : in_out GEM_BLOCK__NODE, 

LOCATOR : value, 

TYPE_NAME : in VS_STR, 

POINT ER_TYPE : value) 
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Defines a bitstring consisting of BITSTR1NG__UB-BIT- 
STRING_LB-i-l elements. A bitstring of unknown size 
is indicated by a BITSTRING_UB value less than the 50 
BITSTRING_LB value. 

DECL_BLK is the block node in which the type is 
defined. LOCATOR is a GEM or foreign locator. 
LOCATOR may be the null locator. TYPE_NAME is 
a varying string describing the type and may be null. 55 
BITSTRING_UB and BITSTRING_LB are the upper 
and lower bounds of the bitstring. 



Define a pointer type. POINTER_TYPE may be a type 
node for an existing type definition or null indicating an 
untyped pointer. TYPE_NAME is a varying string 
describing the type and may be null. LOCATOR is a 
GEM or foreign locator. LOCATOR may be the null 
locator. DECL_BLK is the block node in which the 
type is defined. 



GEM_TD_SET__POINTER_TYPE( 
POINTER_TYPE : value, 
NEW_TYPE : value) 



For the existing pointer definition created by a call to 
GEM_TD_DEF_POINTER, redefine the type asso- 
ciated with the pointer. POINTER_TYPE is a handle 
to the existing type node defined for a pointer. NEW_ 
TYPE is the handle to a type node created for an 
existing type definition. 

Definition of Ranges, Enumerations, and Sets 

The GEM_TD_DEF_RANGE, GEM_TD_DEF_ 
ENUM, GEM_TD_SET_ENUM_ELEMENT and 
GEM_TD_DEF_SET define ranges, enumerations, enu- 
meration elements and sets over defined types. 



TYPE_NODE = 

GEM_TD_DEF_RANGE( 
DECL_BLK 
LOCATOR 
TYPE_NAME 
RANGE_TYPE 
RANGE_LOW_VAL 
RANGE__HJGH_VAL 



in_oul GEM_BLOCK_NODE, 
value, 

in VS_STR, 
value, 

in GEM_LlTERAL_NODE, 
in GEM_LITERAL_NODE) 



60 



GEM_TD_DEF__TYPEDEF supports the definition of a 
new name or symonym for an existing type. GEM_TD_ 
DEF_POINTER allows the definition of a typed or untyped 
pointer. GEM_TD_SET_POINTER_TYPE sets the type 
of a previously specified pointer after the type associated 65 
with a pointer has its type information specified to the GEM 
type definition service. 



Define a range type. The range is defined by its underlying 
type, RANGE_TYPE, and the low and high values of 
the range, as indicated by the literal nodes RANGE_ 
LOW_VAL and RANGE_HIGH_VAL. DECL_ 
BLK is the block node in which the type is defined. 
LOCATOR is a GEM or foreign locator. LOCATOR 
may be the null locator. TYPE_NAME is a varying 
string describing the type and may be null. RANGE_ 
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TYPE is a handle to a type node of an existing basic 
type definition. RANGE„LOW_VAL and RANGE_ 
HIGH_VAL are pointers to literal nodes indicating the 
low and high values in a range. 



TYPE_NODB = 

GEM_TD_DEF„ENUM( 
DECL„BLK 
LOCATOR 
TYPE_NAME 
ENUM_TYPE 



in_out GEM_BLO CK_N ODE, 
value, 

in VS_STR, 
value) 



Define an enumeration. The. enumeration's elements are 
denned by calls to the routine GEM_TD_SET„ 
ENUM_ELEMENT. DECL_BLK is the block node in 
which the Type is defined. LOCATOR is a GEM or 
foreign locator. LOCATOR may be the null locator. 
ENUM„TYPE is a handle to a type node created for an 
existing basic type definition. 

A front end must apply enumeration elements to the 
enumeration definition in first to last order. 



TYPE _NODE = 

GEM_TD_DEF_SET( 
DECL__BLK 
LOCATOR 
TYPE_NAME 
SET_TYPE 



in_out GEM_BLOCK_NODE, 
value, 

in VS_STR, 
value) 



o GEM_TD_DEF_BASIC_TYPE 
o GEM_TD_DEF_CHAR_TYPE 
o GEM_TD_DEF_ENUM 
o GEM _TD_DEF_ RANGE 
o GEM TD TYPEDEF 
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TYPE_NODE = 

GEM_TD_DEF_ARRAY( 
DECL_BLK 

LOCATOR 
TYPE_NAME 
ARRAY_ELEMENT_TYPE 
ARRAY_DIM_COUNT 



20 



GEM_TD_SET_ENUM_ELEMENT( 

ENUM_TY?E : value, 

LOCATOR : value, 25 

ENUM_ELEMENT_ NAME ; in VS_STR, 
ENUM_ELEMENT_ VALUE : in GEM_LITERAL_NODE) 



Define for an enumeration indicated by the type node 
handle ENUM_TYPE, an element named ENUM_ 
ELEMENT_NAME with a value ENUM_ELE- 
MENT_ VALUE. ENUM„TYPE is a handle to an 
existing type node for an enumeration. LOCATOR is a 
GEM or foreign locator. LOCATOR may be the null 
locator. ENUM_ELEMENT_NAME is a varying 
string defining the enumeration element. ENUM__EL- 
EM£NT_VALUE is a literal node defining the 
element's value. 



30 



Defines a set of the type defined by the type node handle 
SET_TYPE. DECL_BLK is the block node in which 
the type is defined. LOCATOR is a GEM or foreign 
locator. LOCATOR may be the null locator. TYPE_ 
NAME is a varying string describing the type and may 
be null. SET_TYPE may be a handle returned by: 
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in_oul G EM _ BLOCK, 

NODE, 

value, 

in VS„STR, 

value, 

value) 
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Define an array of type ARRAY_ELEMENT__TYPE. 
DECL_BLK is the block node in which the type is 
declared. LOCATOR is a GEM or foreign locator. 
LOCATOR may be the null locator. TYPE_NAME is 
a varying string describing the type and may be null. 
ARRAY_ELEMENT_TYPE is a handle to the type 
node defining the type of the array elements. ARRAY„ 
DIM_COUNT in the number of dimensions for the 
array. 

Note that the dimension count is transmitted as a value rather 
than a literal node. 

The bounds of an array's dimensions are specified by 

means of the GEM_TD_SET„ARRAY_BOUNDS 

routine. 



GEM_TD_SET_ARRAY_BOUNDS( 

ARRAY_TYPE : value, 

LOCATOR : value, 

ARRAY_DLM : value, 

DIM_LOW_BOUND : in GEM_NODE, 

DIM_HIGH_BOUND : in GEM_NODE, 

DIM_INDEX_TYPE : value, 

DIM_STRIDE : in GEM_LlTERAL_NODE) 



For the array type definition, specified by the handle 
ARRAY_TYPE, set the bounds of the dimension indi- 
cated by ARRAY_DIM. LOCATOR is a GEM or 
foreign locator. LOCATOR may be the null locator. 
DIM_INDEX_LOW and DIM„INDEX_FQGH 
define the lower and upper bound of the dimension. 
DIM_INDEX_TYPE is a handle to the type node 
defining the type used to index the array dimension. 
DIM„STRJDE defines the size, in bytes between suc- 
ceeding elements of the dimension being defined. 
,blank A constant upper or lower bound is specified by 
a literal node. Nonconstant bounds are indicated by 
symbol nodes that define the location of bounds values. 

Definition of Structures, Variants and Unions 

The following routines are used to define structures, 
including variants, and unions. A structure, which may have 
variant components, is defined by calls to the following 
routines: 



Definition of Arrays 

The routines GEM_TD_DEF__ ARRAY and GEM_ 
TD__SET„ARRAY_BOUNDS may be used to define 
arrays and the bounds of array dimensions. The bounds of 65 
array dimensions may be defined as being fixed, adjustable, 
or assumed. 



o GEM_TD_DEF_STRUCT 

o GEM_TD_SET_STRUCr_ELEMENT 

o GEM_TD_DEF_STRUCT_SELECTOR 

o GEM_TD__DEF_STRUCT_ VARIANT 

o GEM__TD__SET_SELECTOR_RANGE 

o GEM _TD_SET_S ELECTOR _DEFAULT 

o GEM_TD_DEF_UNION 

o GEM_TD__SET_UNION_MEMBER 

TYPE_NODE = 

GEM_TD_DEF_STRUCT( 



DECL_BLK 
LOCATOR 
TYPE_NAME 
STRUCTURE_SIZE 



in„out GEM_BLOCK_NODE, 
value, 

in VS_STR, 
in GER_NODE) 



Define a structure or record. DECL_BLK is the block 
node in which the structure is declared. LOCATOR is 
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a GEM or foreign locator. LOCATOR may be the null 
locator. TYPE_NAME is a varying string describing 
the type and may be null. STRUCTURE_SIZE is the 
size of the structure in bytes. 



84 

specified by the GEM_TD_SET_SELECTOR_ 
RANGE and GEM_TD_SET_SELECTOR_DE- 
FAULT routines. 



GEM_TD_SET_STRUCT__ELEMENT( 



STRUCT_TYPE 
VARIANT. PARENT 
LOCATOR 
ELEMENT_NAME 
ELEMENT_TYPE 
ELEMENT_LOC_BYTE 
ELEMENT„LOC_BIT 
ELEMENT_S IZE 



value, 
: value, 
: value, 
: inVS_STR, 
: value, 

: in GEM_LITERAUJVODE, 
: in GEM_LITERAL_NODE, 
: in GEM_LITERAL_NODE) 



Define an element of the structure defined by the structure 
definition handle STRUCT_TYPE. The element is 
named ELEMENT_NAME and has a type defined by 
the type node handle ELEMENT_TYPE. VARIANT_ 
PARENT is the immediate parent variant of the element 
of null if the element does not a member of a variant. 
LOCATOR is a GEM or foreign locator. LOCATOR 
may be the null locator. Its location is relative to the 
root of the structure being defined and is specified by 
ELEMENTJLOC_BYTE and ELEMENT_LOC_ 
BIT. 

The size of the structure element is specified, in bits, by 
ELEMENT_SIZE. ELEMENT_SIZE is specified to 
support definition of the struct elements cl and c2 in the 
following C program fragment. 



typedef stiuci ml { 
char cl : 4; 
char c2 ; 4; 



}; 



TYPE_NODE = 

G EM _TD_ D EF_STR U CT_S ELECT 0 R ( 
STRUCT_TYPE 
VARIANT_PARENT 
LOCATOR 
ELEMENT_N AME 
ELEMENTJTYPE 
ELEMENT_LOC __B YTE 
ELEMENT_LOC_BIT 
ELEMENT_SIZE 



value, 
value, 
value, 

in VS_STR, 
value, 

in GEM_LITERAL_NODE t 
in GEM_LITERAL_NODE t 
in GEM_LITERAL__NODE) 



Define a selector for variant components of a record A 
selector is a structure element which determines the 
variant of a structure. The selector element is named 
ELEMENT_NAME and has a type defined by the type 
node ELEMENT_TYPE. VARi ANT_PA RENT is the 
immediate parent variant of the selector element or null 
if the element does is not a member of a variant. 
LOCATOR is a GEM or foreign locator. LOCATOR 
may be the null locator. Its location is relative to the 
root of the structure being defined and is specified by 
ELEMENT_LOC_BYTE and ELEMENT_LOC_ 
BIT. The size of the structure element is specified, in 
bits, by ELEMENT_SIZE. 



TYPE_NODE = 

GEM_TD_DEF_STRUCT_VAR1ANT( 

SELECTOR__TYPE : value, 
LOCATOR : value) 



Define a variant of a structure. SELECTOR_TYPE is the 
type node that selects the variant. LOCATOR is a GEM 
or foreign locator. LOCATOR may be the null locator. 
The values of the selector that select the variant are 



20 



25 



GEM_TD_SET_SEUECTOR_RANGE( 

VAR1ANT_TYPE : value, 

LOCATOR : value, 

RANGE_LOWER_BOUND : in GEM_UTERAL_NODE, 
RANGE_UPPER_B 0 UND : in GEM_LITERAL_NODE) 



Define a selector range for the variant VARIANT_TYPE. 
LOCATOR is a GEM or foreign locator. LOCATOR 
may be the null locator. When defining a single selector 
value RANGE_UPPER_B OUND should have the 
same value as RANGE_LOWER_BOUND. Combi- 
nations of selector single and range selectors may be 
applied to a variant. 



GEM_TD_SET_SELECTOR_DEFAULT( 
VARIANT_TYPE : value, 
LOCATOR : value) 



Define a variant type VARIANT_TYPE as being the 
default variant when all of the values of its selector 
have not been enmerated. LOCATOR is a GEM or 
30 foreign locator. LOCATOR may be the null locator. 
When defining a scalar selector value RANGE_UP- 
PER_BOUND should have the same value as 
RANGE_LOWER__BOUND. Combinations of selec- 
tor scalars and ranges may be applied to a variant 
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TYPE_NODE = 

GEM_TD_DEF_UNION( 

DECL_BLK : in_om GEM_BLOCK_NODE, 

LOCATOR : value, 

TYPE_NAME : in VS_STR, 

UNIONISES : in GEM_LITERAL_ - NODE) 



Define a union. DECL_BLK is the block node in which 
the structure is declared. TYPE_NAME is a varying 
string describing the type and may be null. LOCATOR 
is a GEM or foreign locator. LOCATOR may be the 
null locator. UNION_SIZE is the size of the structure 
in bytes. The members of a union are defined by calls 
to the routine GEM_TD_SET_UNION_MEMBER. 



GEM_TD_SET_UN10N_MEMBER( 
UN10N_TYPE : value) 

LOCATOR : value, 

MEMBER_NAME : in VS_STR, 
MEMB ER_T YPE : value) 



60 Define a member of the union indicated by the type node 
UNION__TYPE. UNION_TYPE is the type node of 
the union that contains the member, LOCATOR is a 
GEM or foreign locator. LOCATOR may be the null 

65 locator. MEMBER_NAME is a varying string defining 
the name of the member. MEMBER_TYPE is the type 
node of the member being defined. 
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Definition of Function and Routine Parameters 



TYPE_NODE = 

GEM_TD_DEF_FUNCTION_TYPE( 
DECL_BLK : in_oui 

GEM_BLOCK_NODE, 
LOCATOR : value, 

TYPE_NAME : in VS_STR, 

FUNCTTON_TYPE : value) 



Define the type of a procedure parameter as being of the 
type specified by the type node FUNCTION_TYPE. 
Note that this in not used to define the type of an entry 
symbol, rather it describes parameters to routines. 
DECL_BLK is the block node in which the type is 
defined. LOCATOR is a GEM or foreign locator. 
LOCATOR may be the null locator, TYPE_NAME is 
a varying string describing the type and may be null. 

EXAMPLES 

The following examples describe a number of types and 
symbols and the mechanisms that would be used to describe 
them to GEM. Note that the Pascal type boolean is defined 
as an enumeration over the GEM type uint32 

Examples of Basic Types 



10 



20 



25 



main ( ) { 
int a; 

unsigned int ua; 
float x; 
double xx; 

char strl ] = "Hello, world\n*'; 



TYPINT32 = GEM_TD_DEF_BASIC_TYPE(inain_block, locator, 'int', 

GEM_TYP_K_INT32); 
TYPUINT32 = GEM„TD„DEF_BASlC_TYPE(rnain_block, locator, 'unsigned inl\ 

GEM_TYP_K_UINT32); 
TYPREALF = GEM_TD_DEF_.B AS I C_T YPE(main_blo ck, locator, 'float', 

GEM_TYP_K_REALF); 
TYPREALG = GEM_TD_DEF_BASlC_TYPE(main_block, locator, 'double', 

GEM_TYP_K_REALG); 
TYPCHAR8 = GEM_TD_DEF_CHAR_TYPE(main_block, locator, *char\ 

GEM_TYP_K_INT8); 
TYPSTRING = GEM_TD_DEF_STRING( 

main_block, locator, 

'string', 

GEM_STRREP_*C_ASCIZ, 
TYPCHAR8, 
litnode(len(str)) ); 



50 

Example Definition of Type Boolean 



procedure bt; 
boolean myflag; 



TYPUINT32 = GEM_TD_DEF_B ASIC_TYPE(bt_block, locator, 'unsigned int', 

GEM_TYP_K_UINT32); 
TYPBOOL = GEM_TD_DEF_ENUM(bt_block, locator, 'boolean', TYPEUINT32); 

GEM_TD_SET_ENUM_ELEMENT(TYPBOOL, locator, 'false', litnodc(val=0) ; 

GEM_TD_SET_ENUM_ELEMENT(TYPBOOL, locator, 'true', litnodc(va]=l) ; 



65 
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Examples of Character and Bit Aggregates 



routine lestiKparml, . . .) = 
begin 
own status 



: biivector|15J 
: bitvector[8|; 
: bitvcctor( j; 



flagbits 
bind dbits = .parml 



end; 

TYPBITS1 = GEM_TD_DEF_B ITSTRING (iestit_block, locator, 'bitvector', 
litnode(val=0), litnode(val=14) ); 

TYPBITS2 = GEM_TD_DEF_BrTSTRING(tc$tit_block, locator, *bitveclor\ 
litnode(val=0), litnode(val=7) ); 

TYPBITS3 = GEM_TD_DEF_BITSTRlNGCtestit_block, locator, 'bitvector', 
litaode(val=0), Utnode(val=>-l) ); 



int echo ( ) { 



struct tnode { 



} 

typedef struct mode ssval; 
tnode *tp; 
znodc *zp; 



struct znodse { 



} 

TYPSTRUCTl = definition of structure tnode 
! Define ssval as alias for tnode. 



TYPAUAS = GEM_TD._DEF_TYPEDEF(echo_block, locator, 'ssval', TYPSTRUCTl 
TYPPTR1 = GEM_TD__DEF„POINTER(echo__block, locator, null, TYPSTRUCTl); 
! Define an "anonymous" pointer, then structure znode. Final y modify 
! the pointer type. 

TYPPTR2 = GEM_TD_DEF_POINTER(ecbo_block, locator, 'pointer*, null); 
TYPSTRUCT2 = definition of structure znode 
GEM_TD__SET_P0rNTER_TYPE(TYPPTR2, TYPSTRUCT2); 



Examples of Pointers and Typedefs 



45 



50 
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Examples of Ranges Enumerations and Sets 



void myproc ( ) { 



lypc 



dnl 


= 0. - .6; 


dn2 


= 100. . .105; 


dn3 


= 66000. ..66001; 


weekday 


= (mon.tue.wcd.thu.fri); 


t_typ 


= (intre.boo); 


si 


: set of dnl; 


$2 


: set of weekday, 


s3 


: set of t_typ; 



! Define range dnl 

TYPUINT8 = GEM_TD JDEF_BASIC_TYPE(rnyproc_blcck, locator, null, 

GEM_TYP_K_UINT8); 
TYPRANGE1 = GEM_TD_DEF_RANGE(myproc_block, locator, 'dnl*, TYPUINT8, 

litnode(val=0), litnode(val=6)); 

! Define range dn2. 

TYPRANGE2 = GEM_TD_DEF_RANGE(myproc_block, locator, *dn2\ TYPUINT8, 
litnode(val=100), litnode(val=105)); 

! Define range dn3. 

TYPINT32 - GEM_TD_DEF„BASlC_TYPE(myprac_block, locator, nnll, 

GEM_TYP_K„UINT32); 
TYPRANGE = GEM_TD_DEF_RANGE(myproc_block t TYPINT32, 4 dn3\ 

btnode(val=66000), litnode(val=66001) ); 
TYPENUM1 = G EM__TD_DEF_ENUM(myproc_blo ck, locator, 'weekday', TYPUINT8); 

GEM_TD_SET_ENUM_ELEMENT(TYPENUM1, locator, 'raon', litnode(val=0) ); 

GEM_TD_SET_ENMJM_E1^MR\ T T(TYPENUM1, locator, 'lue', Utnodc(val=l) ); 

GEM_TD_SET_ENUM_ELEMENT(T YPENUM 1 , locator, 'wed', b*uiode(val=2) ); 

GEM_ TD_SET_ENl^_EIXiMENT(T YPENUM 1 , locator, *thu\ Ktnodc<vab=3) ); 

GEM_TD„SET_ENUM_ELEMENT(TYPENUM1, locator, *fri\ Utnode(val=4) ); 
TYPENUM2 = GEM_TD_DEF_ENUM(myproc_block, locator, \_tvp', TYPEU1NT32); 

GEM„TD_S ET_ENUM_ELEMENT(T YPENUM2, locator, *int\ litnode(val=0) ); 

GFJv1_TD_SCT_ENUM_ELEMENT(TYPENlJM2. locator, 're*. liinode(val=l) ); 

GEM_TD_S ET__ENUM_FXEM ENT(T YPENUM2, locator, 'boo". titnode(val=2) ); 
! Define the sets for vars si, s2 AND s3. 

TYPSET1 = GEM_TD __DEF _SEr(myproc_bIock, locator, 'set*, TYPRANGE1); 
TYPSET2 = GEM_TD_DEF_SET(myproc_block T locator, *set\ TYPENUM1); 
TYPSET3 = GEM_TD_DEF_SET(myproc_block, locator, 'set", TYPENUM2); 



Examples of Arrays 



procedure dimmer; 
type 

nd = record. . . 

var 

aryl : arrayll. . .10] of integer; 

ary2 : array(l. . .10,100. . .110J of integer; 

ary3 : array[S00. . .1700] of nd; 

ary4 : arrayl*^. . .'z'] of nd; 
TYPSTRUCT1 = Definition of record type nd. 
! Define array 'aryl'. 

TYPENT32 = GEM_TD_DEF_BASlC„TYPECdimmer_block i locator, null, 

GEM_TYP_K_INT32); 
TYPARRAY = GEM_TD_DEF__ARRAY(dimmer_block. locator, null, TYPINT32, 1); 
GEM_TD_SET_ARRAY_BOUNDS(TYPARRAY, locator, 1, 

litnode(val=l), litnode(val=10). 

TYPINT32, litnode(value=4) ); 

! Define array *ary2'. 

TYPARRAY = GEM_TD„DEF„ARRAY(dimmer_block, locator, null, TYPINT32, 2); 
GEM„TD_SET_ARRAY_BOUNDS (TYPARRAY, locator, I, 

litnode(val=l ), litnode(val=10), 

TYPINT32, litnode(val^) ); 
GEM_TD_S ET_ ARRAY_ BOUMDSfT YPARRAY, locator, 2, 

litnode(val=l00), litnode(val=110), 

TYPINT32, litnode(val=40) ); 
! Alternatively, the array specification for ary2 may defined as: 

TYPARRAY 1 = GEM_TD_DEF_ARRAY(dimmer_block, locator, null, TYPINT32, 1); 
GEM_TD_SET_ARRAY_BOUNDS(TYPARRAYl, locator, 1, 

litaode(val=100), litriode(val=110), 

TYPINT32, litnode(value(4) ); 
TYPARRAY2 = OEM„TD_DEF_ARRAY(dimmer_block, locator, null, TYPARRA1, 1); 
GEM_TD_ J SET_ARRAY_BOUNDS(TYPARRAY2, locator. 1, 

litnode(val=l), litnode(val=10), 

TYPINT32, btnode(value(40) ); 
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-continued 



! Define array 'ary3\ 

TYPARY = GEM_TD„DEF_ARRAY(dinmier_block, locator, null. TYPSTRUCT1, 1); 
GEM_TD_SET_ARRAY_BOUNDS(TYPARY, locator, 1, 

litnode(val=900), litnode(val=1700), 

TYPINT32, sizeof(nd) ); 

! Define array 'ary4*. 

TYPCHAR = GEM„TD_DEF_CHAR_TYPE(dimmer_block, locator, null, 

GEM_TYP_K_UINT8); 
TYPARRAY = GEM_TD_DEF_ARRAY(dimmer_block, locator, TYPSTRUCT1, 1); 
GEM_TD_SET__ARRAY_BOUNDS(TYPARRAY, locator, 1, 

litnode(val=97), btnode(val=122)); 

TYPCHAR, 5izeof(nd) ); 



Examples of Adjustable Array Definition 



subroutine \(cv,ary 1 ,aryZa,b) 
character^*) cv 
dimension aryl(I:10 ( l:b) 
dimension ary2(a:b,l:*) 

TYPINT32 = GEM_TD_DEF_BASIC_TYPE(x_block, locator, null, GEM_TYP_K_INT32) 
TYPCHAR = GEM_TD„DEF„CHAR_TYPE(x_block, locator, null, GEM_TYP_K_INT8); 
! Define array l cv\ 

TYPARRAY = GEM_TD__DEF_ARRAY(x_block, locator, mill, TYPCHAR, 1); 
GEM_TD_SET_ARRAY_B OUNDS(T YPEARRAY, locator, 1, 

Iitnode(val=I), litnode(val=l), 

TYPINT32, litnode(val=l) ); 

! Define army 'aryl\ 

TYPREALF ^ GEM_TD_DEF_BASIC_TYPE(x_block, locator, null, GEM_TYP_K_REALF) 
TYPARRAY = GEM_TD_DEF_ARRAY(x__block, locator, TYPREALF, 2); 

2, litnode(val^) ); 
G EM_TD_S ET_ ARRAY_B OUNDS(T YPARRAY, 1, locator, 

litnode(val=l), litnode(val=10), 

TYPKMT32, litnode(val=4) ); 
GEM„TD_SET_ARRAY_ BOUNDS (TYPARRAY, 2, locator, 

u'tnode(val=l), b_symbol, 

TYPINT32, litnode(val=4) ); ♦**♦«**** 

! Define array *ary2*. 

TYPARRAY = GEM_TD_DEF__ARRAY(x_block, locator, null, TYPREALF, TYPINT32, 

2, Utncde(val=4) ) 
GEM__TD_SET_ARRAY_B OUNDSfT YPARRAY, locator, 1, 

a_symbol, b_symbol, 

TYPINT32, litnode(val=4) ); 
GEM_TD_S ET_ARRAY_B OUNDS(T YPARRAY, locator, 2, 

litnode(val=l ), litnodc(val=l), 

TYPENT32, litnode(val^) ); 



45 
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type 

t_typ = (it, re, ptr, vl, v2, v3); 
ndp = @nd; 
nxl = record 

nxt : ndp; 

case it : t typ of 

it : (iv : integer); 

re : (rv : real); 

ptr : (pv : ndp; sum : integer); 

otherwise : (it : integer; i2 : real); 

end; 

! Define basic types used in example. 

TYPENT32 = GEM_TD_DEF_BASlC_TYPE(typeit_block, locator, 
'integer*, 

GEM_TYP_K_INT32); 
TYPREALF = GEM_TD_DEF_BASIC„TYPE(typeit_block, locator, 
*real\ 

GEM_TYP_K_REALF); 
TYPNIL = GEM_TD_DEF_BASIC_TYPE(typeit_block, Locator, null, 
GEM_TYP_K_N1L); 

! Define ndp pointer to nd. 

TYPPTR = GEM„TD_DEF_POINTER(typeit_bJock, locator, 'ndp', TYPNIL); 
! Define the t_typ enumeration. 

TYPENUM = GEM_TD_DEF_ENUM(myproc__nodc, locator, 't_typ\ TYPINT32); 

GEM_TD_SET„ENUM_ELEMENT(TYPENUM, locator, 'it', liinode(val=0) ); 

GEM_TD_SET_EKUM_ELEMENT (TYPENUM, locator, 're', limode(val=l) ); 

GEM_TD_SET_EMJM_ELEMENT(TYPENUM, locator, 'boo', litnode(val-2) ); 

GEM_TD_SET_ENUM_E1^MENT(TYPENUM, locator, *vl\ litnode(vaI=3) ); 

GEM_TD_SET„ENUM_ELEMENT(TYPENUM, locator, 'v2* ( litriode(val=4) ); 

GEM_TD_SET_E^TJM_ELEMENT (TYPENUM, locator, 'v3', litnode(val=5) ); 
! Define the structure definition nd. 

TYPSTRUCT = GEM_TD_DEF_STRUCT(typeit_block t locator, 'nd', 
litnode(nd_size)); 

GEM_TD_SET_STRUCT_ELEMENT (TYPSTRUCT, null, locator, 'nxt', TYPPTR, 

litnode(l_byte(nxt)), litnode(I_bit(nxt)), litnode (bit_size(nxt)) ); 
! Define the selector for variant parts. 

TYPSEL = GEM_TD_DEF_STRUCT„SELECTOR(TYPSTRUCT t null, l tt\ TYPENUM, 

litnodc(l„bytc(tt)), litnode(l_bit(tt)), litnodc(bit„sizc(tt)) ); 
! Define the variants of the structure including a default. 
VI = GEM_TD_DEF_STRUCT_ VAR1 ANT(TYPS EL, locator); 

GEM_TD_SET_SELECTOR_RANGE(Vl, locator, litnode(val=0), litnode(val=0)); 
G EM __TD„SET_STRUCT_ELEMENT (TYPSTRUCT, VI, locator, 'iv', TYP INT, 
litnode(l_byte(iv)), litnode(l_bit(iv)), litnode(bit_size(iv)) ); 
V2 = GEM„TD_DEF_STRUCT„VARIANT(TYPSEL, locator); 

GEM_TD_SET„SELECTOR„RANGE(V2, locator, litnode(val=l), litnode(val=d)); 
GEM_TD_SET_STRUCT_ELEMENT(TYP STRUCT, V2, locator, 'rv', TYPREALF, 
UUiode(l_byte(rv)), litnode(l_bit(rv)), litnode(bit_size(rv)) ))); 
V3 = GEM_TD_DEF_STRUCT_VARIANT(TYPSEL, locator); 

GEM_TD_SET_SELECTOR_RANGE(V3, locator, litnode(val=2), litnode(val=2 
GEM_TD_SET_STRUCT_ELEMENT (TYPSTRUCT, V3, locator, *pv', TYPPTR, 

litnodefl __byte(pv)), litnode(l_bit(pv)), litnode(bit_size(pv)) ); 
GEM_TD_SET_STRUCT__ELEMENT(TYPSTRUCT, V3, locator, 'sum 1 , TYPPTR, 
litnode(l_byte(sum)), litnode(l_bu(sura)), Utnode(bit_sizc(sum)); 
V4= GEM_TD_DEF_STRUCT_VARJANT (TYPSEL, locator); 

GEM_TD_SET_SELECTOR„DEFAULT(V4, locator); 

GEM_TD_SET_STRUCT_ELEMENT (TYPSTRUCT, V4, locator, 'il'.TYPINT, 
litnode(l_byte(il)), litnode(l_bit(il)), liuiode(bk_size(il)) 
GEM_TD_SET_STRUCT_ELEMENT(TYPSTRUCT, V4, locaior, *i2\ TYP INT, 
litnode(l_byte(i2)). liuiode(l_bit(i2)), litnode(bil_size(i2)) ); 
GEM_TD_SET_POINTER__TYPE(TYPrTR, TYPSTRUCT); 



Examptes of Structures and Union Definition 



main ( ) { 
struct dim3 { 

int x; 

int y; 

int z; 

}; 

union anon { 
int ival; 
float fval; 
char *pval; 
struct dim3 loc; 

>; 

struct nl { 

union anon a; 
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-continued 



union anon b; 
union anon c; 

>; . 

struct nl nll,nl2,nl3; 

TYPINT32 = GEM_TD_DEF_BASIC_TYPE(main_bbck, locator, 'inf. 

GEM_TYP_K_INT32); 
TYPREALF = GEM_TD_DEF_BASIC_TYPE(inain_block, locator, null, 

GEM_TYP_K_ REALF); 
TYPCHAR = OEM_TD_DEF_CHAR_TYPE(main_block, locator. null, 

GEM_TYP_K_U1NT8); 
TYPPTR = GEM„TD_DEF_POINTER(raain_block, locator, null, TYPCHAR); 

! Define structure 'dim3*. 

TYPSTRUCT = GEM_TD_DEF_STRUCT(main_bIock, locator, 'dim3\ 
litnode(dim3_$ize) ); 

GEM_TD_SET_STRUCT_ELEMENT(TYPSTRUCT, null, locator, V, TYPINT32, 
loc_bytc(x), loc_bit(x), litnode(x_size)); 

GEM_TD_SET_STRUCT_ELEMENT(TYPSTRUCT 1 null, locator, *y\ TYPINT32, 
loc_byte(y), loc_bit(y), litnode(y_sizc)); 

GEM_TD_SET_STRUCT_ELEMENT(TYPSTRUCT, nuU, locator, V, TYPINT32, 
loc_byte(z), loc_bit(z), Iitnode(z_sizc)); 

! Define the union 'anon'. 

TYPUNION « GEM_TD_DEF_UN10N(main_block, locator, 'anon', 
litnode(anon size) ); 

GEM_TD„SET_UNION_MEMBER(TYPUNION, locator, 'ival\ TYPrNT32); 
GEM„TD_SET_UNION_MEMBER(TYPUNION, locator, 'rval\ TYPREALF); 
GEM_TD_SET_UNION_MEMBER(TYP UNION, locator, 'pval\ TYPPTR); 
GEM_TD_SET„UNION_MEMBER(TYPUNION, locator, *loc\ TYPSTRUCT); 
! Define the structure 'nl'. 

TYPSTRUCT = GEM_TD_DEF_STRUCT(main_block, locator, 'nl', 
litnode(nl_size) ); 

GEM_TD_SET_STRUCT__ELEMENT(TYPSTRUCT, nuU, locator, 'a\ TYPUNION, 
loc_byte(a), loc_bit(a), 
litnode(anon_size) ); 

GEM_TD_SET__STRUCT_ELEMENT(TYPSTRUCT, null, locator, V, TYPUNION, 
loc_byte(b), loc_bit(b), 
litnode(anon_size) ); 

GEM_TD_SET_STRUCT_ELEMENT(TYPSTRUCT, null, locator, V, TYPUNION, 
loc_byte(b), loc_bit(b), 
litaode(anon size) ); 

35 

Examples of Function Parameter Definion 



function x (function grin : real; 

procedure bearit) : integer, 



TYPREALF = GEM_TD._DEF_BASIC_TYPE(x_block, locator, 'real', 

GEM_TYP_K_ REALF), 
TYPNIL = GEM_TD„DEF_BASIC_TYPE(x_block, locator, null, .. 

GEM_TYP_K_N1L); 
! Define type for function parameter 'grin'. 

TYPPROC = GEM_TD_DEF_FUNCTlON_TYPE(x_.block. locator, null, TYPREALF); 
! Define type for procedure parameter 'bearit*. 

TYPFUNCT - GEM_TD_DEF_FUNCnON_TYPE(x_block. locator, null, TYPNIL); 



What is claimed is: sion in said portion of said intermediate language graph 

1. A method of performing code generation executed in a using actions which are included in said code template 

computer system comprising the steps of: and which indicate said order of evaluation; 

matching a portion of an intermediate language graph 55 allocating, using said actions in accordance with said 

with a code template, said portion of said intermediate order of evaluation, a temporary name for a variable 

language graph comprising a plurality of tuples and arid assigning an allocation lifetime to said temporary 

being a representation of a first source program in an name, said allocation lifetime indicating the extent to 

intermediate language, each tuple representing a single which the temporary name and the storage of the 

operation to be performed in said first source program, 50 temporary name are associated with said variable in 

said code template including a predetermined interme- said intermediate language graph; 

diate language pattern which corresponds to said por- updating at least one of said plurality of tuples in said 

tion of said intermediate language graph to guide in portion of said intermediate language graph as needed 

generating a part of a first object module that corre- to perform said analyzing and said allocating steps as 

sponds to said first source program; 65 indicated by said actions; and 

analyzing said portion of said intermediate language generating machine language instructions that are 

graph to determine an order of evaluation of an expres- included in said part of said object module by using 
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said actions and said intermediate language graph hav- 
ing at least one updated tuple. 

2. The method of claim 1, wherein said temporary name 
is one of a local temporary or non-local temporary name, 
said local temporary name being a variable allocation with 5 
a lifetime limited to said portion of said intermediate lan- 
guage graph, said non-local temporary name being a vari- 
able allocation with a lifetime that extends beyond said 
portion of said intermediate language graph. 

3. The method of claim 2, wherein said matching step is 10 
performed during a first pass over said portion of said 
intermediate language graph, said analyzing step and said 
allocating step for allocating non-local temporary names are 
performed during a second pass over said portion of said 
intermediate language graph, said portion being updated and 15 
producing a modified portion of said intermediate language 
graph, said allocating step for allocating local temporary 
names is performed during a third pass using said modified 
portion of said intermediate language graph, said modified 
portion being updated and producing another modified por- 20 
don of said intermediate language, and said generating step 

is performed during a fourth pass over said other modified 
portion of said intermediate language graph. 

4. The method of claim 3, wherein each of said second, 
said third, and said fourth passes is performed by an action 25 
interpreter that uniquely processes a part of said actions for 
said each pass. 

5. The method of claim 3, wherein said actions include 
one or more undelayed actions and one or more delayed 
actions, said undelayed actions being performed prior to said 30 
delayed actions for each of said second, said third, and said 
fourth passes and producing a processing result which is 
used in one of said delayed actions. 

6. The method of claim 1, wherein one of said actions 
indicates that said variable associated with said temporary 35 
name is stored in a memory. 

7. The method of claim 1, wherein one of said actions 
indicates that said variable associated with said temporary 
name is stored in a register. 

8. The method of claim 1, wherein said predetermined 40 
language pattern includes a result value mode, a pattern tree, 

a sequence of boolean tests, and a cost of the code generated 
by said code template, said result value mode indicating the 
result value computed by said portion of said first object 
module, said pattern tree describing operators and operands 45 
of said predetermined intermediate language pattern, said 
sequence of boolean tests representing statements about said 
portion of said intermediate language graph that must be true 
for said predetermined intermediate language pattern to be 
matched to said portion, said cost being represented as an 50 
integer and indicating a performance cost associated with 
said portion of generated code. 

9. The method of claim 8, wherein said matching step 
includes comparing a cost associated with said code tem- 
plate and another cost associated with another code tern- 55 
plate, and choosing one of said code template and said other 
code template with the minimum associated cost. 

10. The method of claim 1, wherein said first object 
module is for a first target computer system and wherein the 
method of claim 1 is used to produce a second object module 60 
for another target computer system, said second object 
module corresponding to a second source program different 
from said first source program. 

11. A compiler for use in a computer to perform code 
generation during the compiling of a source program to 
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produce a corresponding object module, the compiler com- 
prising: 

a code comparator which matches a portion of an inter- 
mediate language graph with a code template, said 
intermediate language graph comprising tuples and 
being a representation of a first source program in an 
intermediate language, each tuple representing a single 
operation to be performed in said first source program, 
said code template including a predetermined interme- 
diate language pattern which corresponds to said por- 
tion of said intermediate language graph to guide in 
generating a part of a first object module that corre- 
sponds to said first source program; 

a code analyzer for analyzing said portion of said inter- 
mediate language graph to determine an order of evalu- 
ation of an expression in said portion of said interme- 
diate language graph using actions which are included 
in said code template and which indicate said order of 
evaluation; 

an allocator that uses said actions in accordance with said 
order of evaluation to allocate a temporary name for a 
variable and assigning an allocation lifetime to said 
temporary name, said allocation lifetime indicating the 
extent to which the temporary name and the storage of 
the temporary name are associated with said variable in 
said intermediate language graph; 

means for updating a tuple in said portion of said inter- 
mediate language graph as needed by the analyzer and 
the allocator to perform, respectfully, the analyzing and 
the allocating as indicated by said actions; and 

means for generating machine language instructions that 
are included in said part of said object module by using 
said actions and said intermediate language graph hav- 
ing updated tuples. 

12. The apparatus of claim 11, wherein said allocator 
further includes a local temporary name allocator and a 
non-local temporary name allocator, said local temporary 
name allocator allocating variables with a lifetime limited to 
said portion of said intermediate language graph, said non- 
local temporary name allocator allocating variables with a 
lifetime that extends beyond said portion of said interme- 
diate language graph. 

13. The apparatus of claim 11, wherein said predeter- 
mined language pattern includes a result value mode, a 
pattern tree, a sequence of boolean tests, and a cost of the 
code generated by said code template, said result value mode 
indicating the result value computed by said portion of said 
first object module, said pattern tree describing operators 
and operands of said predetermined intermediate language 
pattern, said sequence of boolean tests representing state- 
ments about said portion of said intermediate language 
graph that must be true for said predetermined intermediate 
language pattern to be matched to said portion, said cost 
being represented as an integer and indicating a performance 
cost associated with said portion of generated code. 

14. The apparatus of claim 11, wherein said first object 
module is for a first target computer system and wherein the 
apparatus of claim 11 is used to produce a second object 
module for another target computer system, said second 
object module corresponding to a second source program 
different from said first source program. 

* * * * * 
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